Question

我有两个想法可能导致或多或少相同的结果。

我正在尝试将类似的单元格或表格更新为链接系统中最近的条目。例如，单元格A1链接到单元格B2（在我尝试创建的系统中）。我会在A1中输入“1”或“Text”之类的内容，系统会将单元格B2更新为我在单元格A1中输入的内容。然而，相反的方式必须以相同的方式工作。如果我将单元格B2中的任何内容更改为“5”，则单元格A1也会显示“5”。另请注意，我有Excel 2013。

我需要这个来处理单元格或表格。那么，找到可能的解决方案......

VBA中的子程序，可自动更新所有链接的单元格或表格。
某种我不知道的机制，使用VBA或其他Excel方面来执行此操作，如功能或工具。

在您的回答或解决方案中，请注意我对VBA的经验不足。提前谢谢。

Answer 1

您可以尝试更改工作表功能：

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = Range("A1").Address then
       ActiveSheet.Range("B1").Value = ActiveSheet.Range("A1").Value
    ElseIf Target.Address = Range("B1").Address then
       ActiveSheet.Range("A1").Value = ActiveSheet.Range("B1").Value
    End If
End Sub

虽然这似乎可能会创建一个无限循环（更改的更新会导致另一个更改）但它在Excel 2010中对我有用..

您还可以尝试其他工作表功能（例如Worksheet_SelectionChange）

此宏需要作为WORKSHEET宏放置/输入到您希望使用它的工作表上。它不适用于模块。

安装：

1）将工作簿保存为启用宏的文件。

2）关闭Excel，重新打开文件，然后启用宏安全性

3）输入Alt-F11

4）在左侧的项目浏览器视图中，查找您的工作表名称。双击它

5）在右侧的代码输入区域（大窗口）粘贴上面的示例代码

6）返回工作表并尝试。

将细胞彼此连接;让细胞更新链接的细胞，反之亦然

1 个答案: