excel VBA同时选择多个工作表的方法

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”，以扩展所选择的内容

版权声明：本文内容由网络用户投稿，版权归原作者所有，本站不拥有其著作权，亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容，请联系我们jiasou666@gmail.com 处理，核实后本网站将在24小时内删除侵权内容。