標題: [發問] EXCEL 儲存格同步問題請益 [打印本頁]

---

作者: zz0660    時間: 2021-8-19 00:22     標題: EXCEL 儲存格同步問題請益

使用 函數 或 VBA  如何達成 不同工作表的欄位，有同步功能?
如 工作表1 的 A1 為 2 的時候，工作表2 的 A1 也等於2。

但兩個工作表都能互相打字，假設我在工作表1 的 A1 打上 5 的時候，工作表2 的 A1 等於5，然後我再工作表2 的 A1 打上10，工作表1 的 A1 也等於10。
兩者可以互相打字並同步。
有上網爬文過，但都不是我想要的。

請問各位大大，函數 或 VBA 該如何做到此功能?  

謝謝!

---

作者: edmondsforum    時間: 2021-8-20 14:21

你可以使用
Private Sub Worksheet_Change 來執行哦
你在工作表1 VBA 貼上這個

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
   If Target.Address = "$A$1" Then Sheets("工作表2").Range("A1").Value = [A1].Value
Application.EnableEvents = True
End Sub

在工作表2 VBA　貼上這個
Private Sub Worksheet_Change(ByVal Target As Range)  
Application.EnableEvents = False
   If Target.Address = "$A$1" Then Sheets("工作表1").Range("A1").Value = [A1].Value
Application.EnableEvents = True
End Sub

這樣就可以了

---

作者: zz0660    時間: 2021-8-20 15:01

回復 2# edmondsforum

正解，可以同步了，感謝您的協助。:lol

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)