Office:Excel

上記の画面スニペットを参照してください.

範囲D2:D4で行ったようにリストを作成します.数式が評価されず、セルに数式が表示されるように、列Eに示したように数式の前に一重引用符を付けます.一重引用符は表示されません.(私は2つの一重引用符を使用して
例としてE列に表示)

リストを使用してドロップダウンを作成します(私の例ではD2:D4)

以下のVBAイベントコードをインストールして、ドロップダウンの選択が行われたときに処理します.

イベントVBAコードをインストールするためのガイドライン:

1. ワークシートのタブ名を右クリックします
2. [コードを表示]を選択します(ワークシートのモジュールでVBAエディターwindows が開きます)
3. 以下のVBAコードをコピーして、VBAエディターに貼り付けます.
4. 「$ A $ 2」をDropDownの必要なセルアドレスに編集します(コードのコメントに従って)
5. サブの名前を変更しないでください
6. を閉じますVBAエディター(VBAエディターwindows の右上を横切る)
7. マクロを有効にしてワークブックを保存します.
8. マクロが有効になっていることを確認します.これを行う方法については、ヘルプを参照してください.(「通知付きですべてのマクロを無効にする」オプションは問題ありません.)

これで、DropDownから選択が行われるたびに、選択が実際の数式に変換され、値が計算されます.セルには、セルが選択されたときに数式バーに表示される数式が実際に含まれていることに注意してください.

次のすべてのコードをVBAエディターにコピーします.

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address="$ A $ 2" Then '「$ A $ 2」を必要なセルアドレスに編集
エラー時GoToReEnableEvents
Application.EnableEvents=False
Target.Formula=Target.Value
End If
ReEnableEvents:
If Err.Number<>0 Then
MsgBox "プライベートサブWorksheet_Changeでエラーが発生しました"
End If
Application.EnableEvents=True
Endサブ