Excel VBA,正向與反向計算

Excel VBA,正向與反向計算

我想在我的 Excel 工作表上放置一個 VBA 程式碼,以便 2 個儲存格相互輸入和輸出,這取決於最後輸入的這 2 個儲存格中的哪一個。我怎樣才能做到這一點?請協助

答案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 編輯器
  • 在儲存格中輸入內容(手動、複製貼上一個儲存格、複製貼上範圍、拖曳)
  • 看看,調查一下

相關內容