| 楼主 wise |
Q：如何用VBA查询一个工作薄有多少个非空白工作表？ A：ALT+F11→插入模块→在模块中输入代码：
|
| 2楼 biaotiger1 |
将For Each Sh In ThisWorkbook.Sheets修正为For Each Sh In ThisWorkbook.Worksheets似乎更妥当些 |
| 3楼 罗刚君 |
Application.CountA统计使用区域速度较慢 If Not IsEmpty(Sh.UsedRange) Then |
| 楼主 wise |
Q：如何用VBA查询一个工作薄有多少个非空白工作表？ A：ALT+F11→插入模块→在模块中输入代码：
|
| 2楼 biaotiger1 |
将For Each Sh In ThisWorkbook.Sheets修正为For Each Sh In ThisWorkbook.Worksheets似乎更妥当些 |
| 3楼 罗刚君 |
Application.CountA统计使用区域速度较慢 If Not IsEmpty(Sh.UsedRange) Then |
免责声明
有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，
经与ExcelTip.Net站长Apolloh商议并征得其同意，
现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，
供有需要的人士查询使用，也慰缅曾经的论坛时代。
所示各个帖子的原作者如对版权有异议，
可与本人沟通提出，或于本站点留言，我们会尽快处理。
在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一