NamedRange.PasteSpecial 方法

定义

命名空间:

Microsoft.Office.Tools.Excel

程序集:

Microsoft.Office.Tools.Excel.dll

将剪贴板上 Range 对象的内容粘贴到 NamedRange 控件中。

public object PasteSpecial(Microsoft.Office.Interop.Excel.XlPasteType Paste = Microsoft.Office.Interop.Excel.XlPasteType.xlPasteAll, Microsoft.Office.Interop.Excel.XlPasteSpecialOperation Operation = Microsoft.Office.Interop.Excel.XlPasteSpecialOperation.xlPasteSpecialOperationNone, object SkipBlanks, object Transpose);

abstract member PasteSpecial : Microsoft.Office.Interop.Excel.XlPasteType * Microsoft.Office.Interop.Excel.XlPasteSpecialOperation * obj * obj -> obj

Public Function PasteSpecial (Optional Paste As XlPasteType = Microsoft.Office.Interop.Excel.XlPasteType.xlPasteAll, Optional Operation As XlPasteSpecialOperation = Microsoft.Office.Interop.Excel.XlPasteSpecialOperation.xlPasteSpecialOperationNone, Optional SkipBlanks As Object, Optional Transpose As Object) As Object

参数

Paste

XlPasteType

要粘贴的区域部分。可以是以下 XlPasteType 值之一： xlPasteAllxlPasteAllExceptBordersxlPasteColumnWidthsxlPasteCommentsxlPasteFormatsxlPasteFormulasxlPasteFormulasAndNumberFormatsxlPasteValidationxlPasteValuesxlPasteValuesAndNumberFormats

Operation

XlPasteSpecialOperation

粘贴操作。可以是以下 XlPasteSpecialOperation 值之一： xlPasteSpecialOperationAddxlPasteSpecialOperationDividexlPasteSpecialOperationMultiplyxlPasteSpecialOperationNonexlPasteSpecialOperationSubtract

SkipBlanks

Object

如果不将剪贴板上该范围中的空单元格粘贴到目标范围，则为 true。 默认值为 false。

Transpose

Object

如果在粘贴该范围时对行和列进行转置，则为 true。 默认值为 false。

返回

Object

示例

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

此示例适用于文档级自定义项。

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);
}

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

注解

可选参数

有关可选参数的信息，请参阅 Office 解决方案中的可选参数。