Excel VBA添加单选按钮时出现「Expected: =」编译错误原因问询

核心原因是VBA对带返回值的方法调用有严格的语法约束：
OptionButtons.Add方法执行后会返回新建的单选按钮对象，两段写法的差异刚好触发了不同的语法校验规则：

• 第一段报错的代码：
  你直接写ActiveSheet.OptionButtons.Add(rang.Left, rang.Top, rang.Width, rang.Height)，加了参数括号但既没有将返回的按钮对象赋值给变量，也没有在需要使用该对象的上下文里调用，VBA编译器会默认你想要接收返回值，强制要求你加=完成赋值操作，因此抛出Compile error: Expected: =的编译错误。
  如果你不需要操作生成的按钮，只要把括号去掉就可以正常运行，写法如下：
  ActiveSheet.OptionButtons.Add rang.Left, rang.Top, rang.Width, rang.Height

• 第二段无报错的代码：
  你将OptionButtons.Add的调用放在了With语句的后方，With语法本身就需要接收一个对象实例来作为后续操作的主体，此时Add方法返回的单选按钮对象刚好被With语句消费，符合VBA语法要求，因此不会报错。

下面是可直接运行的最简代码，在当前选中单元格生成单选按钮并设置显示文本：

Sub OptionButtonHelloWorld()
    Dim targetCell As Range
    ' 取当前选中的单元格作为按钮放置位置
    Set targetCell = Cells(Selection.Row, Selection.Column)
    ' 生成按钮并接收返回的对象用于设置属性
    Dim newOptBtn As OptionButton
    Set newOptBtn = ActiveSheet.OptionButtons.Add(targetCell.Left, targetCell.Top, targetCell.Width, targetCell.Height)
    ' 设置按钮显示文本
    newOptBtn.Caption = "Hello, World"
End Sub

内容的提问来源于stack exchange，提问作者ooogooman