NamedRange.Insert 方法

將一個或多個儲存格插入至 NamedRange 控制項中，並移動其他儲存格以產生空間。

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

語法

'宣告
Function Insert ( _
    Shift As Object, _
    CopyOrigin As Object _
) As Object

Object Insert(
    Object Shift,
    Object CopyOrigin
)

參數

• Shift
  型別：System.Object
  指定移動儲存格的方式。可以是下列其中一個 XlInsertShiftDirection 值：xlShiftToRight 或 xlShiftDown。如果省略這個引數，則 Microsoft Office Excel 會根據範圍的形狀來決定。

• CopyOrigin
  型別：System.Object
  其中一個 XlInsertFormatOrigin 值，指定從何處取得要套用至新儲存格的格式。

傳回值

型別：System.Object

備註

選擇性參數

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

範例

下列程式碼範例會設定儲存格 A1 到 A3 的值，然後使用 Insert 方法將空白儲存格插入至名稱為 NamedRange1 且設定為儲存格 A1 的 NamedRange 控制項。 這項作業會向下移動範圍中的儲存格，表示 NamedRange1 現在會設定為儲存格 A2。 為了示範這項作業，範例會將 NamedRange1 的值設定為 Raven，此值顯示在儲存格 A2 中。

這是示範文件層級自訂的範例。

    Private Sub InsertIntoRange()
        Me.Range("A1").Value2 = "Robin"
        Me.Range("A2").Value2 = "Sparrow"
        Me.Range("A3").Value2 = "Crow"

        Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
            = Me.Controls.AddNamedRange(Me.Range("A1"), _
            "namedRange1")

        namedRange1.Insert(Excel.XlInsertShiftDirection.xlShiftDown, )
        namedRange1.Value2 = "Raven"
    End Sub

private void InsertIntoRange()
{
    this.Range["A1", missing].Value2 = "Robin";
    this.Range["A2", missing].Value2 = "Sparrow";
    this.Range["A3", missing].Value2 = "Crow";

    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", missing],
        "namedRange1");

    namedRange1.Insert(Excel.XlInsertShiftDirection.xlShiftDown, missing);
    namedRange1.Value2 = "Raven";
}

.NET Framework 安全性

• 完全信任立即呼叫者。這個成員無法供部分信任的程式碼使用。如需詳細資訊，請參閱從部分受信任程式碼使用程式庫。

請參閱

參考

NamedRange 介面

Microsoft.Office.Tools.Excel 命名空間