NamedRange.End Свойство (2007 System)

Статья
11/16/2008

Обновлен: Июль 2008

Возвращает объект Microsoft.Office.Interop.Excel.Range, представляющий ячейку в конце области, которая содержит элемент управления NamedRange.

Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
<BrowsableAttribute(False)> _
Public ReadOnly Property End As NamedRange..::._EndType
'Применение
Dim instance As NamedRange
Dim value As NamedRange..::._EndType

value = instance.End

[BrowsableAttribute(false)]
public NamedRange..::._EndType End { get; }

Значение свойства

Тип: Microsoft.Office.Tools.Excel.NamedRange._EndType
Объект Microsoft.Office.Interop.Excel.Range, представляющий ячейку в конце области, которая содержит элемент управления NamedRange.

Заметки

Свойство End должно использоваться с указанным ниже параметром.

Параметр	Описание
Direction	Одно из значений XlDirection, указывающее направление, в котором нужно искать последнюю ячейку.

При попытке использования свойства End без указания каких-либо параметров свойство End получит объект NamedRange._EndType, который является частью инфраструктуры Visual Studio Tools for Office и не предназначен для использования непосредственно из кода.

Это свойство эквивалентно нажатию клавиш END+СТРЕЛКА ВВЕРХ, END+СТРЕЛКА ВНИЗ, END+СТРЕЛКА ВЛЕВО или END+СТРЕЛКА ВПРАВО.

Примеры

В приведенном ниже примере кода создается элемент управления NamedRange, который заполняет ячейку справа для создания границы области из пустых столбцов. После этого отображается окно с запросом на выбор конца области справа от NamedRange.

Эта версия предназначена для настройки уровня документа.

Private endRange As Microsoft.Office.Tools.Excel.NamedRange

Private Sub SelectEnd()
    endRange = Me.Controls.AddNamedRange( _
        Me.Range("B1", "D4"), "endRange")
    Me.Range("H1").Value2 = 123
    endRange.Select()
    If MessageBox.Show("Select end of region to the right?", _
        "End of Region Test", MessageBoxButtons.OKCancel) = _
        DialogResult.OK Then
        Me.endRange.End(Excel.XlDirection.xlToRight).Select()
    End If
End Sub

Microsoft.Office.Tools.Excel.NamedRange endRange;
private void SelectEnd()
{
    endRange = this.Controls.AddNamedRange(
        this.Range["B1", "D4"], "endRange");
    this.Range["H1", missing].Value2 = 123;
    endRange.Select();
    if (MessageBox.Show("Select end of region to the right?", 
        "End of Region Test", MessageBoxButtons.OKCancel) == DialogResult.OK)
    {
        this.endRange.End[Excel.XlDirection.xlToRight].Select();
    }
}

Эта версия предназначена для надстройки уровня приложения.

Private endRange As NamedRange

Private Sub SelectEnd()
    Dim vstoWorksheet As Worksheet = CType( _
        Me.Application.ActiveWorkbook.Worksheets(1),  _
        Excel.Worksheet).GetVstoObject()
    endRange = vstoWorksheet.Controls.AddNamedRange( _
        vstoWorksheet.Range("B1", "D4"), "endRange")
    vstoWorksheet.Range("H1").Value2 = 123
    endRange.Select()
    If System.Windows.Forms.MessageBox.Show( _
        "Select end of region to the right?", _
        "End of Region Test", _
        System.Windows.Forms.MessageBoxButtons.OKCancel) = _
        System.Windows.Forms.DialogResult.OK Then
        Me.endRange.End(Excel.XlDirection.xlToRight).Select()
    End If
End Sub

NamedRange endRange;
private void SelectEnd()
{
    Worksheet vstoWorksheet = ((Excel.Worksheet)
        this.Application.ActiveWorkbook.Worksheets[1]).GetVstoObject();
    endRange = vstoWorksheet.Controls.AddNamedRange(
        vstoWorksheet.Range["B1", "D4"], "endRange");
    vstoWorksheet.Range["H1", missing].Value2 = 123;
    endRange.Select();
    if (System.Windows.Forms.MessageBox.Show(
        "Select end of region to the right?",
        "End of Region Test", 
        System.Windows.Forms.MessageBoxButtons.OKCancel) ==
        System.Windows.Forms.DialogResult.OK)
    {
        this.endRange.End[Excel.XlDirection.xlToRight].Select();
    }
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.

См. также

Ссылки

NamedRange Класс

NamedRange - члены

Microsoft.Office.Tools.Excel - пространство имен

Журнал изменений

Дата	Журнал событий	Причина
Июль 2008	Добавлена версия кода для надстройки уровня приложения.	Изменение функции SP1.

Поделиться через