如何选择窗体控件中的ActiveX选项/单选按钮

我有一个窗体控件，其中包含ActiveX收藏/选项按钮。表单控件名称是Side，包含名称为xOption，oOption和randomSide的选项/单选按钮。我将如何创建一个宏，使我可以在打开工作簿时将单选按钮设置为特定值。录制宏的单击选项会导致空白宏。我已经尝试过：如何选择窗体控件中的ActiveX选项/单选按钮

ActiveSheet.Shapes.Range(Array("Side")).Select 
ActiveSheet.Shapes.Range("xOption").OLEFormat.Object.Value = 1

但是这给了我错误1004和其他代码给我错误91.我是真正的新VBA，所以如果我看起来愚蠢，你知道为什么。

来源

2017-07-27 Bob lin

您是否想在打开工作簿时选择一个选项？ – paulinhax

@paulinhax是的，只有一个 –

尝试这样的事情，用Worksheets代替ActiveSheet：

Private Sub Workbook_Open() 
    Worksheets("your sheet name here").OLEObjects("xOption").Object.Value = 1 
End Sub

当你想让它打开表后进行选择。把它放在ThisWorkbook。

来源

2017-07-27 19:28:42 paulinhax

另请参阅[this]（https://stackoverflow.com/documentation/excel-vba/1107/vba-best-practices/11274/always-define-and-set-references-to-all-workbooks-and-sheets ＃T = 201707271939591786196）。 – paulinhax

你可以试试这样的事情...

ActiveSheet.OLEObjects("xOption").Object.Value = 1

来源

2017-07-27 19:11:02 sktneer

这给了我一个1004错误，无法获得工作表的OLEObjects属性类 –

由于代码将在ActiveSheet上工作，您确定在ActiveSheet上有一个ActiveX选项按钮？还要确保选项按钮的名称与代码中使用的名称相同。 – sktneer

如何选择窗体控件中的ActiveX选项/单选按钮

回答

相关问题