使用Excel VB，更新特定的單元格，對其他特定單元格的任何更改

Question

我認爲這應該是一個簡單的直接問題，但是我對VB編碼非常陌生。

我想有A1的複製到B1的內容，與B1完全可編輯的，但是，如果任何更改至A1製成的內容再次複製到B1。 但是，如果對A1進行了更改，我只希望它激活它的內容。

Private Sub Worksheet_Change(ByVal Target As Range) 
    Range("A3").Formula = Range("A1").Formula 
End Sub 

感謝你的幫助， 蘭迪

Answer 1

您可以使用此代碼：

Private Sub Worksheet_Change(ByVal Target As Range) 
    If Not Intersect(Target, Range("A1")) Is Nothing Then 
     Range("B1") = Range("A1") 
    End If 
End Sub 

Answer 2

這是一個關於活動頁面在Excel cpearson.com/excel/Events.aspx

有沒有像「cell_changed」。你可以得到的最好的是「Worksheet_change」，但是每當表單上的內容發生變化時都會觸發它。當然，如果這個事件發生了變化，那麼你可以檢查這個事件是否是「A1」。但是可能你的功能需要經常檢查。