ppt2013技巧怎樣通過宏命令創(chuàng)建pdf文檔
ppt2013技巧怎樣通過宏命令創(chuàng)建pdf文檔
PPT2013是日常辦公軟件之一,里面的一些功能非常之人性化,那么大家知道如何在powerpoint2013中通過宏命令一鍵點擊創(chuàng)建pdf文檔?其實這還需要打開PPT的開發(fā)工具菜單,通過vba代碼及相關(guān)手動設置來實現(xiàn)。具體方法請大家看一下文章,歡迎大家來到學習啦學習ppt2013通過宏命令創(chuàng)建pdf文檔的方法。
ppt2013通過宏命令創(chuàng)建pdf文檔的方法
此處以PowerPoint 2013為例,其他版本的操作略有不同。
點擊菜單:文件→選項→自定義功能區(qū)→主選項卡,勾選“開發(fā)工具”。或直接在所有命令中找到“宏”,添加到自定義菜單中即可。
點擊菜單“開發(fā)工具”,可以在常用工具欄“代碼”中看到“宏”的圖標。
END
啟用宏并輸入相應的vba代碼
操作步驟:1.在“開發(fā)工具”選項卡的“代碼”組中,單擊“宏”。如果“開發(fā)工具”選項卡不可用,請參閱顯示“開發(fā)工具”選項卡。2.在“宏”對話框的“宏”名稱框中,鍵入宏的名稱,如pdf。3.在“宏作用于”列表中,單擊要存儲宏的模板或演示文稿。默認是活動文檔,不用更改。4.在“說明”框中,鍵入宏的說明??梢圆挥锰顚?。5.單擊“創(chuàng)建”打開 Visual Basic for Applications。
將如下----之間的代碼拷貝復制到打開的宏命令代碼窗口中,保存:
----
Sub SaveAsPDF()
ActivePresentation.ExportAsFixedFormat ActivePresentation.Path & "\" & ActivePresentation.Name & ".pdf", ppFixedFormatTypePDF, ppFixedFormatIntentPrint
End Sub
----
代碼解釋:
ActivePresentation.ExportAsFixedFormat 將ppt文檔導出,利用參數(shù)設置導出為對應的格式。
ActivePresentation.Path & "\" & ActivePresentation.Name & ".pdf" 將ppt文檔另存為當前目錄下的pdf,文件名同ppt。
此處可以將相對引用更改為混合引用,如:“D:\DATA\" & ActivePresentation.Name & ".pdf";
或絕對引用,如:D:\DATA\a.pdf"
整理代碼來源:
原始詳細代碼:https://msdn.microsoft.com/en-us/library/office/ff746080.aspx,有相關(guān)的一系列對應參數(shù)、代碼的解釋,可以進一步學習參考。
----之間為代碼:
----
Public Sub ExportAsFixedFormat_Example()
ActivePresentation.ExportAsFixedFormat "C:\Users\username\Documents\test.pdf", ppFixedFormatTypePDF, ppFixedFormatIntentScreen, msoCTrue, ppPrintHandoutHorizontalFirst, ppPrintOutputBuildSlides, msoFalse, , , , False, False, False, False, False
End Sub
----
在運行時可能會出現(xiàn)下面的錯誤:
究其原因,應是教案上參數(shù)設置過多,將ppFixedFormatIntentScreen后面的多余參數(shù)全部刪除即可。
這里是本文引用的簡化過后的代碼,可以有效運行,不出錯誤。
http://www.free-power-point-templates.com/articles/vba-macro-save-a-powerpoint-presentation-to-pdf-programmatically/
END
添加一鍵運行宏命令功能
方法有二:
1. 文件→選項→自定義功能區(qū)→從下列位置選擇命令→宏→添加到自定義菜單中。
2. 文件→選項→快速訪問工具欄→從下列位置選擇命令→宏→添加到自定義菜單中。
注意事項:宏命令生成的按鈕,不管是在常用工具欄中,還是在快速啟動工具欄中,一般都只能在打開有宏命令的文件后,在活動的ppt文件中運行。
含有宏命令的PowerPoint2013文件需要保存為pptm格式,才能保存宏的vba代碼。
END
擴展應用
可以結(jié)合Excel數(shù)據(jù)清單,用ppt設計好圣誕賀卡后,快速轉(zhuǎn)換為pdf,發(fā)給客戶。
準備數(shù)據(jù)清單:字段名:
公司,姓名,稱呼,電郵等
在已經(jīng)設置好賀卡的ppt中,打開”開發(fā)工具“功能,運行宏,添加代碼如下:
Sub PDF()
ActivePresentation.ExportAsFixedFormat "C:\Users\Users\Desktop\christmas2015.pdf", ppFixedFormatTypePDF, ppFixedFormatIntentScreen
End Sub
目錄中路徑代碼可以更改,本處為默認的桌面位置。
然后將ppt另存為pptm文件。
用上面的操作”添加一鍵運行宏命令功能“,來添加臨時的生成pdf的按鈕,可以將ppt一鍵生成pdf到桌面。
修改相應的稱謂,生成pdf后,將桌面的christmas2015.pdf拖動到郵件中。
發(fā)送郵件成功后,再將稱謂修改為另一客戶的,一鍵生成christmas2015.pdf覆蓋桌面原有文件。依次操作,知道快速發(fā)送完所有電子版pdf的賀卡。
ppt生成的pdf文件,如背景沒有空白,pdf也沒有空白。
如用虛擬軟件如pdffactory、bullzip等打印背景沒有空白的ppt,多數(shù)pdf將在pdf的四邊留下空白邊框。
猜你感興趣: