如何快速定位所有窗体按钮控件？

楼主
chrisfang

Q：如何在工作表中快速定位所有的窗体按钮控件（非ActiveX控件）？
A：Excel中的选择窗格功能可以快速选定所有对象，也可以手动选择其中的某些对象，但要快速的选定某一类控件对象，还是使用VBA的方法比较高效，例如要在活动工作表中定位所有的窗体“按钮”控件（或称表单控件），可以参考以下代码：

Sub cmdselect()
For Each shp In ActiveSheet.Shapes
If shp.Type = msoFormControl Then
If shp.FormControlType = xlButtonControl Then 'xlButtonControl 可以替换为其他表单控件类型，详见下面附表
MsgBox "表单按钮：" & shp.Name '或执行其他语句
End If
End If
Next shp
End Sub

附：【表单控件类型】

名称	值	说明
xlButtonControl	0	按钮
xlCheckBox	1	复选框
xlDropDown	2	组合框
xlEditBox	3	文本框
xlGroupBox	4	分组框
xlLabel	5	标签
xlListBox	6	列表框
xlOptionButton	7	选项按钮
xlScrollBar	8	滚动条
xlSpinner	9	微调按钮

上一篇：如何更改插入Excel中的图片颜色模式？
下一篇：如何将文本框控件中的文字靠左对齐？

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

猜您喜欢

评论列表

sitemap