Excel で「デフォルト」または「プレースホルダー」値を設定する方法はありますか?

Question 1

これを行うための組み込みの方法はないので、独自の方法を作成する必要があります。

一つの可能性は次の通りです:

デフォルトを設定する各セルに対して、そのセルを参照するワークシートスコープの名前付き範囲を作成し、コメントフィールドに必要なデフォルト値を入力します。

ワークブックモジュールWorkbook_SheetChangeイベントを追加する

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Dim nm As Name
    Dim cl As Range

    On Error Resume Next
    For Each cl In Target.Cells
        If IsEmpty(cl) Then
            For Each nm In Sh.Names
                If nm.RefersToRange.Address = cl.Address Then
                    Application.EnableEvents = False
                    If IsNumeric(nm.Comment) Then
                        nm.RefersToRange.Value = Val(nm.Comment)
                    Else
                        nm.RefersToRange.Value = nm.Comment
                    End If
                    Application.EnableEvents = True
                    Exit For
                End If
            Next
        End If
    Next
End Sub

これは次のことを行います:

セルが変更されるたびにイベントコードが実行される
変更されたセルが空の場合
- セルを参照するワークシートスコープの名前付き範囲を探します
- 見つかった場合は、名前のコメントをセルの値にコピーし、数値に変換するのが適切です。

Answer

これを行うための組み込みの方法はないので、独自の方法を作成する必要があります。

一つの可能性は次の通りです:

デフォルトを設定する各セルに対して、そのセルを参照するワークシートスコープの名前付き範囲を作成し、コメントフィールドに必要なデフォルト値を入力します。

ワークブックモジュールWorkbook_SheetChangeイベントを追加する

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Dim nm As Name
    Dim cl As Range

    On Error Resume Next
    For Each cl In Target.Cells
        If IsEmpty(cl) Then
            For Each nm In Sh.Names
                If nm.RefersToRange.Address = cl.Address Then
                    Application.EnableEvents = False
                    If IsNumeric(nm.Comment) Then
                        nm.RefersToRange.Value = Val(nm.Comment)
                    Else
                        nm.RefersToRange.Value = nm.Comment
                    End If
                    Application.EnableEvents = True
                    Exit For
                End If
            Next
        End If
    Next
End Sub

これは次のことを行います:

セルが変更されるたびにイベントコードが実行される
変更されたセルが空の場合
- セルを参照するワークシートスコープの名前付き範囲を探します
- 見つかった場合は、名前のコメントをセルの値にコピーし、数値に変換するのが適切です。

Question 2

私は次のように機能する方法を使用します:

-- 学校の記録の簡単な例:

列 A は行タイトルです: 学生 ID、姓、名、生年月日、年齢など。
列 B はゴースト列です: 幅 1、左揃え、インデント 1 増加、保護、フォント色グレー、テキスト折り返しなし
列Cは入力フィールドです

-- 列 B の値は、列 C にデフォルトで表示する内容で読み込まれます。値は、付随するヘルパーシート、セルが入力されると更新される数式、デフォルト値やエラーメッセージを含む別のスプレッドシートなどから取得できます。

-- したがって、生徒 ID を入力すると、姓、名、生年月日、住所、両親などがすぐに下の行にゴースト値として表示されます。列 C のセルには何も入力されていないため、列 B のゴースト値は列 C に拡張されます。(数値と日付の値は text() 関数で書式設定する必要があります。) 子供の情報を確認した後、オペレーターはクラススケジュール、担任教師などを入力します。

-- 何かを変更する必要がある場合は、セルに入力して、その子の何かが異なることを示します。(姓、親の名前、住所など)

-- または、姓と名を入力し、ID を空白のままにしておくと、ゴースト値にはマスタースプレッドシートの子 ID が表示されます。

-- ヘルパーシートには、列 C のセルに触れると消えるヘルパーテキストを表示できます。または、スプレッドシートのロジックによって、ヘルパーテキストが適切でなくなったか、別のテキストを表示する必要があると判断されることもあります。

ゴースト値は検索可能で、デフォルトテキストの場合は灰色、警告の場合は赤色になり、付随するスプレッドシートが更新されると自動的に更新されます。

制限として、ゴーストテキストは列 C に折り返すことができません。

Answer