如何用VBA修改activex控件,选项按钮的属性?
如何用VBA修改activex控件,选项按钮的属性?我尝试录制属性修改动作,结果是什么都没有录下来。崩溃了。...
如何用VBA修改activex控件,选项按钮的属性?我尝试录制属性修改动作,结果是什么都没有录下来。崩溃了。
展开
1个回答
展开全部
直接 用代码写啊,不知道你想对控件 的什么属性 进行设置?设成什么?
例子:
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
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询