⑴ 設置宏另存pdf問題，請高手指教。
自己 錄制宏。
最好在2007里，重新錄制一遍。
用不了1分鍾就錄制好了（剛剛用2010做了一個 宏按鈕，輸出pdf）。
注意：每次執行宏，輸出的pdf都是同一個文件，也就是說2個不同的文件A和B，A輸出C，B
也是輸出C，此時A輸出的C被B輸出的C覆蓋（A和B內容不同），
這個宏會在同一個路徑下保存同一個文件名，也就是你錄制宏的時候保存的文件名。
輸出PDF之前，要保證你的這個C文件 沒有被打開，或者被其他程序佔用。
⑵ 利用WORD的宏批量把WORD轉換為PDF
word文檔批量處理大師有這個功能的，另外，該軟體7.1版增加了批量運行vba宏代碼的功能，有了該功能，所有使用者都可以自己定製適合自己的功能了，極為強悍，最新版需要在該軟體的官方網站下載
⑶ 有多個sheet的excel表格如何通過設置宏完成PDF的批量列印
請安裝Adobe Acrobat XI Pro軟體，並將默認列印機設置為Adobe PDF虛擬列印機，運行以下程序連續列印指定工作表，要自己選擇路徑和輸入文件名（或請高手補充），完成名工作表列印轉換輸出後，用Adobe Acrobat XI Pro軟體，在菜單-創建-將多個文件創建PDF，選擇你要的文件或其它格式文件，排序，合並文件即可。
Sub宏1()
DimiAsInteger,arr()AsVariant
arr=Array("1","2","3甲","3乙","3丙","4甲A")
Fori=0To5
Sheets(arr(i)).Activate
ActiveWindow.SelectedSheets.PrintOutFrom:=1,To:=1,Copies:=1,Collate:=True
Next
EndSub
⑷ Excel轉換為PDF的宏代碼
將下面代碼粘入宏中
Sub Macro1()
Dim i As Integer
n = 35 '自行更改
Dim s As String
Range("A1:z99").Select
Selection.ClearContents
Do While i <= n
s = Chr(65 + i - Int(Sqr(i)) ^ 2) & Int(Sqr(i) + 1)
Range(s) = i
i = i + 1
Loop
i = 0
Dim Coln As String
Dim Rown As String
Do While i <= n
Coln = Int(Sqr(n)) + 3 + i - Int(Sqr(i)) * Int(Sqr(i) + 1) + Int(Sqr(n))
Rown = (Int(Sqr(i)) - Abs(i - Int(Sqr(i)) * Int(Sqr(i) + 1)) + 65)
Range(Chr(Rown) & Coln) = i
i = i + 1
Loop
MsgBox "Over!"
End Sub