'方法1
Sheet1.Labels("标签 1").Caption = "标签内容"
Sheet1.Buttons("按钮 1").Caption = "开始按钮"
Sheet1.CheckBoxes("复选 1").Value = xlOn
Sheet1.OptionButtons("选项按钮 1").Value = xlOn
Sheet1.ListBoxes("列表框 1").Value = 1
Sheet1.DropDowns("下拉框 1").Value = 2
'方法2
Sheet1.DrawingObjects("标签 1").Caption = "标签内容"
Sheet1.DrawingObjects("按钮 1").Caption = "开始按钮"
Sheet1.DrawingObjects("复选框 1").Value = xlOn
Sheet1.DrawingObjects("选项按钮 1").Value = xlOn
Sheet1.DrawingObjects("列表框 1").Value = 1
Sheet1.DrawingObjects("下拉框 1").Value = 2 EXCEL-VBA：控制（设置）表单控件，读取内容
猜你喜欢
转载自blog.csdn.net/jyh_jack/article/details/85093051
今日推荐
周排行