Excel VBA、順方向および逆方向の計算

Question

エクセルシートにVBAコードを入れて、2つのセルのどちらが最後に入力されたかに応じて、2つのセルが互いに入力と出力になるようにしたいです。どうすれば実現できますか？ご協力をお願いします

Answer 1

• 新しい Excel ブックを作成する
• VBA エディターを開く (Alt + F11)
• プロジェクトペインで「Sheet1」をダブルクリックすると、コードウィンドウが開きます。
• 以下のコードを入力してください:

Private Sub Worksheet_Change(ByVal Target As Range)
Static busy As Boolean
If busy Then Exit Sub
busy = True
Select Case Target.Address
    Case "$A$1"
        Range("A2") = "A1=""" & Range("A1").Text & """"
    Case "$A$2"
        Range("A1") = "A2=""" & Range("A1").Text & """"
End Select
busy = False
End Sub

• VBAエディターを閉じる
• セルに何かを入力します（手動、1 つのセルをコピーして貼り付け、範囲をコピーして貼り付け、ドラッグオーバー）
• 見て、調べて