Excel 有很多有用的內置圖表,您還可以組合併創建一些令人驚嘆的組合圖表。Excel 圖表是一種直觀地顯示數據的好方法,當您必須將其展示給您的經理/客戶時,它通常是最常用的。
雖然您的圖表可能在 Excel 中,但這並不是向您的客戶/經理展示它們的最佳方式。通常,需要在 PowerPoint 演示文稿或 PDF 的 MS Word 文檔中顯示這些圖表。
如果它們是將 Excel 圖表保存為圖像的內置功能,那就太好了,但事實並非如此。
但是,有一些方法可以輕鬆地將 Excel 中的圖表保存和導出為圖像(JPG、PNG、BMP 是一些流行的),在本教程中,我將介紹這些方法。
我使用的方法取決於你有多少圖表。如果您只有幾個要保存為圖像的圖表,則可以使用複制粘貼方法,但如果您有很多,最好使用“下載為 HTML”或 VBA 方法。
Contents
將圖表複製為另存為圖像(MS Paint 或其他圖形工具)
我看到很多人使用的一個非常常見的方法是截取整個屏幕的屏幕截圖(這可以通過點擊 PrintScreen 鍵來完成)。完成此操作後,您可以打開 MS Paint(或您使用的任何工具),粘貼屏幕截圖,然後刪除其他所有內容並保留圖像。
雖然這是將圖表另存為圖像的好方法並且效果很好,但還有一種更好的方法(花費的時間更少,圖像更準確)。
假設您有一個帶有如下圖表的 Excel 文件:
以下是將此圖表/圖形另存為圖像的步驟:
- 右鍵單擊要保存的圖表
- 點擊複製
- 打開 MS Paint(或您使用的任何工具)
- 粘貼圖像(Control V 適用於 MS Paint)
- 如果有任何多餘的空白,只需選擇並拖動它,這樣你就只有圖表了
- 單擊文件選項卡
- 轉到另存為
- 單擊要保存圖表的圖像格式(有 JPG、PNG 和 BMP 格式)。
這種方法超越屏幕截圖的好處是,這種方法只複製圖表,您需要在 MS Paint 中調整一次空白(如果您使用任何其他圖形工具,則可能不需要)。
如果您在 Excel 中已經有兩個或多個圖表排列,並且您想要將整個排列保存為圖像,您可以通過選擇所有這些圖表、複製它們並將它們粘貼到 MS Paint 中來實現。
一次將工作簿中的所有圖表保存為圖像
如果您有一個包含大量圖表的工作簿,並且您想一次性保存所有這些圖表,更好的方法是將 Excel 工作簿保存為 HTML 文件。
執行此操作時,Excel 工作簿中的所有圖表都將在下載的文件夾中保存為 PNG 格式的圖像。
假設您有一個 Excel 工作簿,其中包含多個帶有圖表的工作表。
以下是將文件保存為 HTML 並將 Excel 圖表保存為 PNG 格式的圖像的步驟:
- 打開包含圖表的工作簿
- 單擊文件選項卡
- 點擊另存為
- 單擊瀏覽並選擇要保存所有圖表圖像的位置
- 將“保存類型”更改為網頁(*.htm、*.html)
- 點擊保存
這會將您的 Excel 文件保存為指定文件夾中的網頁。
現在要將所有圖表作為圖像獲取,請轉到文件夾,您將找到一個名為 Filename_files 的文件夾(其中 FileName 是您在保存文件時為文件指定的名稱)。
打開此文件夾時,您會發現所有已保存為 PNG 圖像的圖表。
注意:當我在我的系統上嘗試此操作時,它為每個圖表提供了兩個圖像(相同)。因此,如果您有四個圖表,它將為您提供八個圖像。
注意:在將 Excel 文件另存為 HTML 之前,請確保保存備份副本。此外,當您將文件另存為 HTML 時,當前打開的文件現在是 HTML 文件,而不是 Excel 格式文件。保存文件後,您應該關閉當前文件(現在是 HTML 文件)並打開 Excel 版本(這就是為什麼備份很重要)
使用 VBA 將所有圖表保存為圖像
您還可以使用 VBA 代碼將圖表從 Excel 工作簿快速保存到特定文件夾。
如果您只需要將活動圖表(您選擇的圖表)保存到特定文件夾中,您可以使用以下 VBA 代碼:
ActiveChart.Export ":UserssumitDesktopExampleChartName.png"
上面的代碼會將活動圖表以 PNG 格式保存在 Example 文件夾中,名稱為 ChartName。您可以根據需要更改圖表名稱和文件夾名稱/位置。
如果您想以 JPG 格式保存圖像/圖片,可以使用以下代碼:
ActiveChart.Export ":UserssumitDesktopExampleChartName.jpg"
您可以通過將其放在即時窗口中運行此 VBA 代碼,將光標放在行尾並按 Enter 鍵(或者您可以放入常規模塊並從那裡運行代碼)。
但是,如果您有很多圖表,這種方法將需要相當長的時間。在這種情況下,您可以使用下面提到的稍長的 VBA 代碼:
Sub SaveChartsasImages()
Dim i As Integer
Dim CurrentActiveSheet As Worksheet
Application.ScreenUpdating = False
Application.EnableEvents = False
Set CurrentActiveSheet = ActiveSheet
For Each Sht In Worksheets
For Each cht In ActiveSheet.ChartObjects
cht.Activate
i = i + 1
ActiveChart.Export “C:\Users\sumit\Desktop\Example\” & Sht.Name & “_chart” & i & “.png”
Next cht
Next Sht
CurrentActiveSheet.Activate
Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub
上面的代碼遍歷工作簿中的每個工作表,然後在每個工作表中進入每個圖表。然後它選擇圖表並將其保存在指定的文件夾中。
所有這些循環都是使用 For Each Next 循環完成的。
此外,圖表以名稱格式 worksheetname_chartNumber 保存。這將確保您能夠識別哪個圖表屬於哪個工作表。
使用 VBA 的另一個好處是您可以自定義代碼以僅將圖表保存為來自某些特定工作表的圖像。例如,如果您只想保存帶有前綴 2020 的工作表中的圖表,您可以修改代碼來執行此操作(這可以使用 FOR 循環行之後的 IF THEN ELSE 語句來完成)
在 MS Word 或 PowerPoint 中將 Excel 圖表複製並粘貼為圖像
在大多數情況下,您必須在 MS Word 或 PowerPoint 文檔中展示您的圖表。如果您正在創建客戶報告或文檔,通常會出現這種情況。
就像您可以在 MS Paint 中復制和粘貼圖像一樣,您也可以對 Word 或 PowerPoint 執行相同操作。
但是有一個區別……
當您在 Excel 中復製圖表/圖形並將其粘貼到 MS Word 或 MS PowerPoint 中時,它不會被粘貼為圖像。它實際上被粘貼為“Microsoft Office 圖形對象”
此選項對於希望即使在 MS Word 或 PowerPoint 中仍保留圖表的人很有用,因此您可以將其編輯和格式化為圖表。另外,這種圖表還是和Excel中的數據相連的,當你在後台更新數據時,這個粘貼的圖表也會隨之更新。
但是,如果您希望將此圖表粘貼為圖像,以下是執行此操作的方法(在此示例中,我將使用 MS Word 來展示這些步驟,對於 PowerPoint 也是如此):
- 選擇要復製到 MS Word 的圖表
- 右鍵單擊,然後單擊複製
- 打開要將此圖表粘貼為圖像的 MS Word 文檔
- 在“主頁”選項卡的“剪貼板”類別中,單擊“粘貼”圖標(向下箭頭部分)。
- 在出現的選項中,單擊粘貼為圖片選項
上述步驟將確保圖表被粘貼為圖片。
如果您只是單擊粘貼按鈕(而不是粘貼為圖片),圖形將不會被粘貼為圖片。
因此,您可以通過以下四種方式將 Excel 中的圖表快速保存為圖像。某些方法還允許您選擇圖像的格式(例如使用 MS Paint 或 VBA)。
如果您只有幾個圖表,您可以使用 MS Paint 方法,但如果您要保存跨工作表的許多圖表,最好使用 HTML 方法或 VBA 代碼。如果最終的目的是在 Word 或 PowerPoint 中插入這些圖表,最好將這些圖表直接複製並粘貼為這些其他工具中的圖片。
希望您發現本教程很有用。