Excel是许多职场人士常用的烦恼之源,学习相关技巧需耗费大量时间。简道云作为一款办公神器,能很好地替代Excel。它是一个在线表单和数据管理工具,支持PC端和手机微信浏览器操作。除此之外,简道云还能辅助企业进行流程审批、财务报销、人事管理等业务管理,满足不同需求。
excel VBA同时选择多个工作表的方法
如果要用VBA同时选择多个工作表,可以利用数组或设置“Select”方法的参数为“False”来扩展所选择的内容,如下面的一些代码:
1.用工作表名称:
假如工作表名称为“Sheet1”、“Sheet2”、“Sheet3”,同时选择这3个工作表:
Sub SelectMultiSheets()Sheets(Array("Sheet3", "Sheet2", "Sheet1")).SelectEnd Sub
2.用工作表索引号:
索引号是分配给工作表的连续数字,同一类型的工作表在工作簿中按照从左到右的顺序,依次为1、2、3……。下面的代码同时选择第1个和第3个工作表:
Sub SelectMultiSheets1()Worksheets(Array(3, 1)).SelectEnd Sub
3.选择所有工作表:
如果工作簿中不包含图表工作表、对话框工作表,下面的代码可以同时选择所有的工作表:
Sub SelectAllSheets()Dim ws As WorksheetFor Each ws In ActiveWorkbook.Sheetsws.Select FalseNext wsEnd Sub
其中“Select”方法的参数为“False”,以扩展所选择的内容。