如何用VBA修改activex控件,选项按钮的属性?我尝试录制属性修改动作,结果是什么都没有录下来。崩溃了。
直接 用代码写啊,不知道你想对控件 的什么属性 进行设置?设成什么?
例子:
Private Sub CommandButton2_Click()
CommandButton1.Caption = "按钮1"
Label1.Caption = "标签"
Label1.Width = 100
End Sub追问
例子:
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
温馨提示:答案为网友推荐,仅供参考