將Excel中圖表復(fù)制為圖片的方法是什么
將Excel中圖表復(fù)制為圖片的方法是什么
使用Excel VBA可以將工作表中的圖表復(fù)制為圖片,在Excel圖表中,實現(xiàn)這種操作使用的是ChartObjects對象的CopyPicture方法。以下是學(xué)習(xí)啦小編為您帶來的關(guān)于將Excel中圖表復(fù)制為圖片的方法,希望對您有所幫助。
將Excel中圖表復(fù)制為圖片的方法
1、啟動Excel并打開包含圖表的工作表,打開Visual Basic編輯器,在工程資源管理器中添加一個模塊,在模塊的“代碼”窗口中輸入程序代碼,如圖1所示。具體的程序代碼如下所示:
Sub CopyChart()
If ActiveChart Is Nothing Then
MsgBox "請先選擇一個圖表!"
Exit Sub
End If
ActiveChart.CopyPicture appearance:=xlScreen,Format:=xlBitmap
Range("N8").Select
ActiveSheet.Paste
End Sub
圖1 插入模塊并輸入程序代碼
提示
在VBA中,CopyPicture方法能夠?qū)⑦x中的圖表作為圖片復(fù)制到剪貼板中,該方法的語法結(jié)構(gòu)如下所示:
表達式CopyPicture(Appearance,Format)
這里,表達式是一個代表ChartObject對象的變量。該方法的Appearance參數(shù)是一個可選參數(shù),用于設(shè)置圖片的復(fù)制方式,其默認值為xlScreen。該參數(shù)可以設(shè)置為下面的兩個常量之一。
xlPrinter:圖片按其打印效果進行復(fù)制。
xlScreen:圖片盡可能按其屏幕顯示進行復(fù)制。
Format參數(shù)用于設(shè)置圖片復(fù)制的格式,其默認值為xlPicture。該參數(shù)可以設(shè)置為下面的兩個常量之一。
xlBitmap:位圖(.bmp、.jpg、.gif)。
xlPicture:繪制圖片(.png、.wmf、.mix)。
2、按F5鍵運行程序,如果沒有選擇工作表中的圖表,則程序給出提示,提示用戶先選擇圖表,如圖2所示;如果已經(jīng)選擇了工作表中的圖表,則選擇圖表被復(fù)制,如圖3所示。
圖2 提示選擇圖表
圖3 選擇圖表被復(fù)制為圖片
猜你喜歡: