如何在不同工作簿里运行宏?

比如我有一百张表格（不同工作簿里面的，就是一个文件夹里有100张表格），要把它们都调整横向，缩放65%打印出来，我已经设好了一个调整的宏，保存在个人宏工作簿中，原来都是一个个打开工作簿运行这个宏，能不能设置一下不用一张张打开一张张运行，这个意思。

没看懂你的意思。
你是想在不同的工作簿中调用同一段vba程序吗?

你可以试试将宏保存在个人宏工作簿中。

对补充问题的回复：
既然你知道录制宏，可以将修改的代码添加在下面的代码里。
实现遍历该文件所在目录下的所有文件。

Sub test()
Application.ScreenUpdating = False
p = ThisWorkbook.Path & "\"
f = Dir(p & "*.xls")
m = ThisWorkbook.Name
Do
If f <> m Then
Workbooks.Open (p & f)
'需要你自己添加的代码
ActiveWorkbook.Save
ActiveWorkbook.Close
End If
f = Dir
Loop Until f = ""
Application.ScreenUpdating = True
End Sub

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