如何用VBA修改activex控件,选项按钮的属性?

如何用VBA修改activex控件,选项按钮的属性?我尝试录制属性修改动作,结果是什么都没有录下来。崩溃了。

直接 用代码写啊,不知道你想对控件 的什么属性 进行设置?设成什么?

例子:
Private Sub CommandButton2_Click()
CommandButton1.Caption = "按钮1"
Label1.Caption = "标签"
Label1.Width = 100
End Sub追问

能不能通过VBA语句添加一个activex选项按钮,并对这个按钮的名称、Groupname进行修改?

追答

'如下代码!
Dim OLEOb As OLEObject
Set OLEOb = ActiveSheet.OLEObjects.Add(ClassType:="Forms.OptionButton.1", Link:=False, _
DisplayAsIcon:=False, Left:=354.75, Top:=223.5, Width:=157.5, Height _
:=31.5)
With OLEOb
.Name = "OptName"
.Object.GroupName = "GPName"
.Object.Caption = "选项1"
End With

温馨提示:答案为网友推荐,仅供参考

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网