Excel VBA在新机器上出现运行时错误438的选项按钮

14 浏览
0 Comments

Excel VBA在新机器上出现运行时错误438的选项按钮

我有一些代码，它在我的旧工作机器上运行良好，并且在其他工作机器上也能正常工作，但在新提供的工作电脑上却无法运行。当我引用选项按钮时，代码似乎会出错，但对于其他代码都可以正常工作。例如，下面这行代码：

Sub test()
    Sheets("Sheet1").OptionButton1.value = "False"
End Sub

生成了以下错误信息：

运行时错误'438'：对象不支持此属性或方法

我已经验证了以下内容：

  • 我正在使用与之前相同版本的Microsoft Excel
  • 与之前相同的引用已包含在内
  • 我正在使用表单控件，而非ActiveX控件
  • 即使我将代码改为：ActiveSheet.Shapes("OptionButton1").ControlFormat.Value = xlOff，仍然会出现相同的错误
0