共用方式為


Chart.CopyPicture 方法

將圖表以圖片形式複製到 [剪貼簿] 中。

命名空間:  Microsoft.Office.Tools.Excel
組件:  Microsoft.Office.Tools.Excel (在 Microsoft.Office.Tools.Excel.dll 中)

語法

'宣告
Sub CopyPicture ( _
    Appearance As XlPictureAppearance, _
    Format As XlCopyPictureFormat, _
    Size As XlPictureAppearance _
)
void CopyPicture(
    XlPictureAppearance Appearance,
    XlCopyPictureFormat Format,
    XlPictureAppearance Size
)

參數

備註

選擇性參數

如需選擇性參數的詳細資訊,請參閱Office 方案中的選擇性參數

範例

下列程式碼範例會建立 Chart,然後使用 CopyPicture 方法將圖表以點陣圖形式複製到 [剪貼簿] 中。

Private Sub CopyChartAsBitmap()
    Me.Range("A1", "A5").Value2 = 22
    Me.Range("B1", "B5").Value2 = 55

    Dim Chart1 As Microsoft.Office.Tools.Excel.Chart = _
        Me.Controls.AddChart(Me.Range("D2", "H12"), "Chart1")

    Chart1.SetSourceData(Me.Range("A1", "B5"), Excel.XlRowCol.xlColumns)
    Chart1.ChartType = Excel.XlChartType.xl3DColumn

    Chart1.CopyPicture(Excel.XlPictureAppearance.xlScreen, _
        Excel.XlCopyPictureFormat.xlBitmap, _
        Excel.XlPictureAppearance.xlScreen)
End Sub
private void CopyChartAsBitmap()
{
    this.Range["A1", "A5"].Value2 = 22;
    this.Range["B1", "B5"].Value2 = 55;

    Microsoft.Office.Tools.Excel.Chart chart1 =
        this.Controls.AddChart(this.Range["D2", "H12"], 
        "chart1");

    chart1.SetSourceData(this.Range["A1", "B5"], 
        Excel.XlRowCol.xlColumns);
    chart1.ChartType = Excel.XlChartType.xl3DColumn;

    chart1.CopyPicture(Excel.XlPictureAppearance.xlScreen,
        Excel.XlCopyPictureFormat.xlBitmap, 
        Excel.XlPictureAppearance.xlScreen);
}

.NET Framework 安全性

請參閱

參考

Chart 介面

Microsoft.Office.Tools.Excel 命名空間