Skip to main content

如何在Excel中使用命令按鈕將當前工作表保存為PDF文件?

Author: Siluvia Last Modified: 2025-08-06

在使用Microsoft Excel時,您可能會遇到需要將當前工作表保存為PDF文件的問題。本文將教您如何通過命令按鈕使用VBA代碼將當前工作表保存為PDF文件。如果您還想將一個區域或當前工作簿中的每個工作表分別保存為單獨的PDF文件,本文也能幫助到您。

使用命令按鈕通過VBA代碼將當前工作表保存為PDF文件
輕鬆將當前或每個工作表保存為單獨的PDF文件,使用Kutools for Excel


使用命令按鈕通過VBA代碼將當前工作表保存為PDF文件

您可以運行以下VBA代碼,通過點擊命令按鈕將當前工作表保存為PDF文件。請按照以下步驟操作:

1. 首先,您需要創建一個名為PDF的文件夾來保存新轉換的PDF文件。我在這裡將該文件夾創建在我的本地磁盤(C:)中。

2. 請通過點擊開發工具 > 插入 > 命令按鈕(ActiveX 控件)來插入一個命令按鈕。參見截圖:

click Command Button from Developer tab

2. 然後在需要添加新行的工作表中繪製一個命令按鈕,右鍵單擊該命令按鈕並從右鍵菜單中選擇屬性

lick Properties from the right-clicking menu

3. 在屬性對話框中,在分類標籤下的標題框中輸入命令按鈕的顯示文本,然後關閉對話框。

enter the displayed text of the Command Button in the Properties dialog box

您可以看到命令按鈕的顯示文本已更改,如下截圖所示。

the displayed text of the Command Button is changed

4. 再次右鍵單擊該命令按鈕,然後從右鍵菜單中選擇查看代碼

click View Code from the right-clicking menu

5. 在打開的Microsoft Visual Basic for Applications窗口中,請用以下VBA代碼替換原始代碼窗口中的代碼。

VBA代碼:命令按鈕將當前工作表保存為PDF

Private Sub CommandButton1_Click()
    Application.ScreenUpdating = False
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
            Filename:="C:\PDF\Export.pdf", _
            OpenAfterPublish:=False
    Application.ScreenUpdating = True
End Sub

注意:在代碼中,CommandButton1是您將用於保存當前工作表為PDF文件的命令按鈕名稱。“C:\PDF\Export.pdf” 是您保存PDF文件的路徑和名稱。

6. 同時按下Alt + Q鍵以關閉Microsoft Visual Basic for Applications窗口。然後關閉開發工具選項卡下的 設計模式

現在,點擊命令按鈕,當前工作表將被保存為名為Export的PDF文件,並位於指定位置。


使用Kutools for Excel將當前工作簿中的每個工作表保存為單獨的PDF文件

在此推薦Kutools for Excel 分割工作簿功能,可以輕鬆將當前工作表保存為PDF文件。此外,您還可以使用此功能將當前工作簿中的每個工作表分別保存為單獨的PDF文件。

Kutools for Excel 提供超過 300 種進階功能,簡化複雜任務,提升創造力與效率。 結合 AI 能力,Kutools 能夠精準自動化任務,讓數據管理變得輕而易舉。Kutools for Excel 的詳細資訊...免費試用...

1. 在需要將每個工作表保存為單獨PDF文件的工作簿中,然後點擊Kutools Plus > 工作簿 > 分割工作簿。參見截圖:

click Split Workbook feature of kutools

2. 在分割工作簿對話框中,請進行如下配置:

2.1) 只勾選工作表名稱框中的當前工作表名稱;
2.2) 從另存為類型下拉列表中選擇PDF (*.pdf)選項;
2.3) 點擊分割按鈕,然後彈出選擇文件夾對話框,指定一個文件夾來保存PDF文件;

specify options in the Split Workbook dialog box

然後所選工作表立即被保存為PDF文件。

the selected worksheet is saved as PDF file

注意

1. 您可以在工作表名稱框中勾選多個工作表名稱,一次性將它們保存為單獨的PDF文件;
2. 除了將工作表保存為PDF文件外,您還可以根據需要將工作表保存為txt或csv文件。

相關文章

最佳 Office 辦公效率工具

🤖 Kutools AI Aide:徹底革新數據分析,基於智能執行|生成程式碼|創建自訂公式|分析數據並生成圖表|調用 Kutools Functions
熱門功能查找、選取項目的背景色或標記重複值 | 刪除空行 | 合併列或單元格且不丟失資料 | 四捨五入...
高級 LOOKUP多條件查找|多值查找|多表查找|模糊查找...
高級下拉列表快速創建下拉列表 | 關聯下拉列表 | 多選下拉列表 ...
列管理器添加指定數量的列 | 移動列 | 切換隱藏列的可見狀態 | 區域與列比較 ...
精選功能網格聚焦 | 設計檢視 | 增強編輯欄 | 工作簿及工作表管理器 | 資源庫 (自動文本) | 日期提取器 | 合併資料 | 加密/解密儲存格 | 按清單發送電子郵件 | 超級篩選 | 特殊篩選(篩選粗體/傾斜/刪除線 ...)...
前15 大工具集12 款文本工具添加文本刪除特定字符,...)|50+ 種圖表 類型甘特圖,...)|40+ 實用 公式基於生日計算年齡,...)|19 款插入工具插入QR码按路徑插入圖片,...)|12 款轉換工具金額轉大寫匯率轉換,...)|7 款合併和分割工具高級合併行分割儲存格,...)| ...以及更多
使用 Kutools 支援你的語言——支援英語、西班牙語、德語、法語、中文及40 多種語言!

利用 Kutools for Excel 大幅提升你的 Excel 技能,感受前所未有的高效體驗。 Kutools for Excel 提供超過300 項高級功能,助你提升效率並保存時間。 點此查看你最需要的功能...


Office Tab 為 Office 帶來標籤式介面,讓你的工作更加輕鬆

  • 啟用 Word、Excel、PowerPoint 的標籤式編輯和閱讀功能
  • 在同一個視窗的標籤中打開和創建多個文件,而不是在新窗口中分開開啟。
  • 可提升你50% 的工作效率,每天為你大量減少滑鼠點擊次數!