代码之家  ›  专栏  ›  技术社区  ›  Bob lin

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

  •  2
  • Bob lin  · 技术社区  · 7 年前

    我有一个带有ActiveX单选/选项按钮的窗体控件。 表单控件名为Side,包含名为xOption、oOption和randomSide的选项/单选按钮。 我如何才能创建一个宏,允许我在打开工作簿时将单选按钮设置为某个值。录制“我单击选项”的宏会导致一个空白宏。我已经试过了:

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

    2 回复  |  直到 7 年前
        1
  •  1
  •   paulinhax    7 年前

    Worksheets 而不是 ActiveSheet :

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

    根据您希望在打开图纸后将其选中。把这个放在 ThisWorkbook

        2
  •  0
  •   Subodh Tiwari sktneer    7 年前

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