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


Worksheet.ListObjects Свойство (2007 System)

Обновлен: Ноябрь 2007

Возвращает коллекцию объектов Microsoft.Office.Interop.Excel.ListObject на рабочем листе.

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

Синтаксис

'Декларация
<BrowsableAttribute(False)> _
Public ReadOnly Property ListObjects As ListObjects
'Применение
Dim instance As Worksheet
Dim value As ListObjects

value = instance.ListObjects
[BrowsableAttribute(false)]
public ListObjects ListObjects { get; }

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

Тип: Microsoft.Office.Interop.Excel.ListObjects
Коллекция Microsoft.Office.Interop.Excel.ListObjects рабочего листа.

Примеры

В следующем примере кода с помощью свойства ListObjects выполняется добавление элемента управления Microsoft.Office.Interop.Excel.ListObject в текущий рабочий лист.

В этом примере демонстрируется настройка уровня документа.

Private Sub AddListObject()
    Dim range1 As Excel.Range = Me.Range("A1", "A10")
    range1.Formula = "=rand()"

    Dim listObject1 As Excel.ListObject = _
        Me.ListObjects.Add(Excel.XlListObjectSourceType.xlSrcRange, _
        range1, False, Microsoft.Office.Interop.Excel.XlYesNoGuess.xlNo)

    MsgBox("The list object covers the range " & _
        listObject1.DataBodyRange.Cells.Address( _
            ReferenceStyle:=Excel.XlReferenceStyle.xlA1))
End Sub
private void AddListObject()
{
    Excel.Range range1 = this.Range["A1", "A10"];
    range1.Formula = "=rand()";

    Excel.ListObject listObject1 = this.ListObjects.Add(
        Excel.XlListObjectSourceType.xlSrcRange, range1, false,
        Microsoft.Office.Interop.Excel.XlYesNoGuess.xlNo, missing);

    MessageBox.Show("The list object covers the range " +
        listObject1.DataBodyRange.Cells.get_Address(missing, missing,
        Excel.XlReferenceStyle.xlA1, missing, missing));
}

Разрешения

См. также

Ссылки

Worksheet Класс

Worksheet - члены

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