2

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

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

我需要它来处理单元格或表格。所以，找到可能的解决方案......

  1. VBA 中的一个子程序，它自动更新所有链接的单元格或表格。

  2. 某种我不知道的机制，它使用 VBA 或其他 Excel 方面来执行此操作，例如函数或工具。

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

4

1 回答 1

3

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

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) 返回您的工作表并尝试一下。

于 2013-10-23T02:17:04.217 回答