excel - "Expected End of Statement"VBA 中 Target.Address 错误

Question

我正在尝试创建一个代码，当特定工作表中的单元格的值发生更改时执行宏。我在 Sheet 模块中使用以下代码:

Private Sub Worksheet_Change (ByVal Target As Range)
  If Target.Address  =  Range("C3") Then
    Macro2
  End If
End Sub

但是，我收到“预期语句结束”错误。

谢谢!

Answer 1

如果您使用帖子中出现的代码(不是呈现的代码，而是帖子中的实际字符/编辑问题以到达那里)，请从那里复制代码，并将其粘贴到 VBE 中，Private Sub Worksheet_Change (加上奇怪的尾随空格)被认为是一个单词(Ctrl+ArrowLeft 或 Ctrl+ArrowRight 一路跳跃，没有任何停止，确认)

这彻底搞砸了一切，你会得到奇怪的编译器和语法错误:



VBA 期望标记由 ASCII 代码 32(一个普通的旧空白字符)分隔，但是 Private 之间是什么, Sub , Worksheet_Change , 和开头 ( (以及之后的每个空格)看起来 类似于空格，但实际上是网站和博客文章中经常看到的特殊字符(例如，使代码块正确换行)，称为 不间断空格 (HTML 实体   )。

不要直接从网站复制粘贴代码(尤其是博客文章；Stack Overflow 通常没问题，除非文章作者故意植入不间断空格)。自己输入。

实际上，当涉及事件处理程序时，甚至不要自己输入它们——让 VBE 为您创建过程 stub ，这样就可以保证您具有正确的签名。只需选择 Worksheet从代码 Pane 顶部的左侧下拉列表中，然后选择 Change在右侧下拉列表中 - Private Sub Worksheet_Change处理程序将自动添加。