Question

如何将EXCEL工作簿中所有工作表一次性运行同一个宏？

现在我只能对每个工作表一个个地运行指定的宏，但表有几百个，就得点几百次，太麻烦了，然后选中所有工作表后，点击运行指定的宏，但提示报错。感谢各位大侠协助，感谢！！
其中，我的宏定义为：“保护工作表”和“允许用户编辑区域”，所以当选中全部工作表时，这两个按扭是灰的，不能点击，就不能编辑宏了。

Answer 1

1、在电脑里面找到需要打印的表格

2、打开需要打印的表格会发现工作簿里面有好几个表格

3、点开工作薄中的任意一个表格

4、右击下方的单元格1，找到“选定全部工作表”并点击

5、找到表格左上方的office按钮

6、点击office按钮，找到“打印”，选择“打印”

7、点击打印，出现一个“打印内容”的界面，选择确定就可以了

Answer 2

1.在电脑里找到要打印的表格。

2. 打开表单打印，您将在工作簿中发现几个表单。

3.点开工作薄抄中的任意一个表格。

4.右击下方的单元格1，找到“选定全部工作表知”并点击。

5.在表的左上角找到office按钮。

6.点击office按钮，找到“打印”，选择“打印”。

7.点击打印，将出现“打印内容”界面，选择ok。

Answer 3

一种办法：选中所有表格，再录制宏。
另一种办法：最简单的办法是用VBA修改宏，枚举每一张表，执行相同的操作步骤。

追问

不行先选中所有表格,再录制宏.因为我的宏定义为保护工作表和允许用户编辑区域。当选中所有工作表时，保护工作表和允许用户编辑区域两个按扭是灰的，不能点。
VBA修改宏，不会用。。。。怎么搞啊。。。晕

追答

追加的代码如下：

Sub test()

n = Worksheets.Count

For i = 1 To n

  Worksheets(i).Activate

  Macro1

Next

End Sub

注：上面所写到所有Macro1，请修改为你的宏名称。

Answer 4

说明你写的宏不行，应该加个循环就自动把所有表执行一遍了。。。

Answer 5

选中所有的sheet，在其中一个中进行操作，相当于同时在所有的sheet里进行了同样的操作。