NamedRange.Insert Метод (2007 System)
Обновлен: Ноябрь 2007
Вставляет ячейку или диапазон ячеек в элемент управления NamedRange и сдвигает остальные ячейки, чтобы освободить место.
Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)
Синтаксис
'Декларация
Public Function Insert ( _
Shift As Object, _
CopyOrigin As Object _
) As Object
'Применение
Dim instance As NamedRange
Dim Shift As Object
Dim CopyOrigin As Object
Dim returnValue As Object
returnValue = instance.Insert(Shift, CopyOrigin)
public 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 выполняется вставка пустой ячейки в элемент управления NamedRange с именем NamedRange1, заданным для ячейки A1. Данная операция сдвигает ячейки внутри диапазона вниз, поэтому имя 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";
}
Разрешения
- Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.