NamedRange.Copy 方法

NamedRange 控件的内容复制到指定的范围或剪贴板。

命名空间:  Microsoft.Office.Tools.Excel
程序集:  Microsoft.Office.Tools.Excel(在 Microsoft.Office.Tools.Excel.dll 中)

语法

声明
Function Copy ( _
    Destination As Object _
) As Object
Object Copy(
    Object Destination
)

参数

  • Destination
    类型:System.Object
    指定要将 NamedRange 控件的内容复制到其中的新范围。如果省略此参数,则 Microsoft Office Excel 将该范围复制到剪贴板。

返回值

类型:System.Object

备注

可选参数

有关可选参数的信息,请参见Office 解决方案中的可选参数

示例

下面的代码示例使用 Copy 方法将名为 NamedRange1 的 NamedRange 控件的内容复制到剪贴板,然后使用 PasteSpecial 方法将这些内容粘贴到名为 NamedRange2 的 NamedRange 控件中。将 Operation 参数设置为 xlPasteSpecialOperationAdd,以便将 NamedRange1 中每个单元格的内容添加到 NamedRange2 中相应的单元格。

此示例针对的是文档级自定义项。

    Private Sub CopyAndPasteSpecialRange()
        Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
            = Me.Controls.AddNamedRange(Me.Range("A1", "A3"), _
            "namedRange1")
        namedRange1.Value2 = 22

        Dim namedRange2 As Microsoft.Office.Tools.Excel.NamedRange _
            = Me.Controls.AddNamedRange(Me.Range("C1", "C3"), _
            "namedRange2")
        namedRange2.Value2 = 5

        ' Copy the contents of namedRange1 to the clipboard, and then
        ' paste the contents into namedRange2, adding each value to
        ' the value in namedRange2.
        namedRange1.Copy()
        namedRange2.PasteSpecial(Excel.XlPasteType.xlPasteAll, _
        Excel.XlPasteSpecialOperation.xlPasteSpecialOperationAdd, _
        False, False)
    End Sub

private void CopyAndPasteSpecialRange()
{
    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "A3"],
        "namedRange1");
    namedRange1.Value2 = 22;

    Microsoft.Office.Tools.Excel.NamedRange namedRange2 =
        this.Controls.AddNamedRange(this.Range["C1", "C3"],
        "namedRange2");
    namedRange2.Value2 = 5;

    // Copy the contents of namedRange1 to the clipboard, and then
    // paste the contents into namedRange2, adding each to
    // the value in namedRange2.
    namedRange1.Copy();
    namedRange2.PasteSpecial(Excel.XlPasteType.xlPasteAll,
        Excel.XlPasteSpecialOperation.xlPasteSpecialOperationAdd,
        false,
        false);
}

.NET Framework 安全性

请参见

参考

NamedRange 接口

Microsoft.Office.Tools.Excel 命名空间