Chart.Paste(Object) Method

Reference

Definition

Namespace:: Microsoft.Office.Tools.Excel

Assembly:: Microsoft.Office.Tools.Excel.dll

Important

Some information relates to prerelease product that may be substantially modified before it’s released. Microsoft makes no warranties, express or implied, with respect to the information provided here.

Pastes chart data from the Clipboard into the specified Chart control.

public void Paste (object Type);

abstract member Paste : obj -> unit

Public Sub Paste (Optional Type As Object)

Parameters

Type: Object

Specifies the chart information to paste if a chart is on the Clipboard. Can be one of the following XlPasteType constants: xlPasteFormats, xlPasteFormulas, or xlPasteAll. The default value is xlPasteAll. If there is data other than a chart on the Clipboard, this argument cannot be used.

Examples

The following code example creates a Chart and then uses the Paste method to paste additional range data from the Clipboard into the chart.

private void PasteDataIntoChart()
{
    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;

    // Set additional range values and copy them to 
    // the Clipboard.
    this.Range["A6", "A10"].Value2 = 11;
    this.Range["B6", "B10"].Value2 = 33;
    this.Range["A6", "B10"].Copy();

    // Paste the range data from the Clipboard into the chart.
    chart1.Paste();
}

Private Sub PasteDataIntoChart()
    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

    ' Set additional range values and copy them to the Clipboard.
    Me.Range("A6", "A10").Value2 = 11
    Me.Range("B6", "B10").Value2 = 33
    Me.Range("A6", "B10").Copy()

    ' Paste the range data from the Clipboard into the chart.
    Chart1.Paste()
End Sub

Remarks

This method changes the current selection.

Optional Parameters

For information on optional parameters, see Optional Parameters in Office Solutions.

Applies to

Freigeben über