![Excel工作簿之间的双向链接](https://linux22.com/image/1286746/Excel%E5%B7%A5%E4%BD%9C%E7%B0%BF%E4%B9%8B%E9%97%B4%E7%9A%84%E5%8F%8C%E5%90%91%E9%93%BE%E6%8E%A5.png)
在 Excel 中,是否可以将两个单元格链接在一起(在不同的工作簿中),以便其中一个单元格的更改可以反映在另一个单元格中?
单向链接很容易实现,即一个单元格是另一个单元格中值的视图。我想要双向链接,这样用户可以更新任一单元格,并让该值反映在另一个单元格中。
答案1
跨工作簿是不可能的,但跨同一工作簿中的工作表是可以的:
对于此私人子项,右键单击 Excel 按钮并点击view code
Private Sub Workbook_TwoWayMatch(ByVal Sh As Object, ByVal Target As Range)
If UCase(Sh.Name) = "sheet1" Or UCase(Sh.Name) = "sheet2" Then
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
Application.EnableEvents = False
If UCase(Target.Parent.Name) = "SHEET1" Then
Sheets("Sheet2").Range("A1") = Target
Else
Sheets("Sheet1").Range("A1") = Target
End If
Application.EnableEvents = True
End If
End If
End Sub