Метод ListObjects.Add (Excel)

Создает новый объект списка.

Синтаксис

expression. Добавить (SourceType, Source, LinkSource, XlListObjectHasHeaders, Destination, TableStyleName)

Выражение Переменная, представляющая объект ListObjects .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
SourceType	Необязательный	XlListObjectSourceType	Указывает тип источника для запроса.
Source	Optional	Variant	When SourceType = xlSrcRange: объект Range , представляющий источник данных. Если этот параметр опущен , источник по умолчанию будет использовать диапазон, возвращаемый кодом обнаружения диапазона списка. When SourceType = xlSrcExternal: массив строковых значений, указывающих соединение с источником, содержащий следующие элементы: 0 — URL-адрес сайта SharePoint 1 — ListName 2. ViewGUID Когда SourceType = xlSrcQuery: принимает строку подключения ODBC или OLEDB (это также работает с xlSrcExternal). When SourceType = xlSrcModel: принимает объект WorkbookConnection (пример см. в разделе TableObject ).
LinkSource	Необязательный	Логический	Указывает, должен ли внешний источник данных быть связан с объектом ListObject . Если параметр SourceType имеет значение xlSrcExternal, по умолчанию используется значение True. Недопустимо, если параметр SourceType имеет значение xlSrcRange и вернет ошибку, если он не опущен.
XlListObjectHasHeaders	Необязательный	Variant	Константой XlYesNoGuess , указывающей, имеются ли у импортируемых данных метки столбцов. Если источник не содержит заголовки, Excel автоматически создаст заголовки. Значение по умолчанию: xlGuess.
Destination	Необязательный	Variant	Объект Range , указывающий ссылку на одну ячейку в качестве назначения для левого верхнего угла нового объекта списка. Если объект Range ссылается на несколько ячеек, возникает ошибка. Аргумент Destination должен быть указан, если параметр SourceType имеет значение xlSrcExternal. Аргумент Destination игнорируется, если параметр SourceType имеет значение xlSrcRange. Целевой диапазон должен находиться на листе, который содержит коллекцию ListObjects, указанную выражением. Новые столбцы будут вставлены в место назначения в соответствии с новым списком. Таким образом, существующие данные не будут перезаписаны.
TableStyleName	Необязательный	String	Имя объекта TableStyle; например TableStyleLight1.

Возвращаемое значение

Объект ListObject , представляющий новый объект списка.

Замечания

Если список содержит заголовки, первая строка ячеек будет преобразована в текст, если еще не задано значение text. Преобразование будет основано на видимом тексте ячейки. Это означает, что если имеется значение даты с форматом даты , изменяющимся с языковым стандартом, преобразование в список может привести к разным результатам в зависимости от текущего языкового стандарта системы. Кроме того, если в строке заголовка есть две ячейки с одинаковым видимым текстом, будет добавлено добавочное целое число , чтобы сделать каждый заголовок столбца уникальным.

Пример

В следующем примере новый объект ListObject на основе данных с сайта Microsoft SharePoint Foundation добавляется в коллекцию ListObjects по умолчанию и помещает список в ячейку A1 на первом листе книги.

Примечание.

В следующем примере кода предполагается, что вы замените допустимое имя сервера и guid списка в переменных strServerName и strListGUID. Кроме того, за именем сервера должно следовать имя сервера, иначе "/_vti_bin" (strListName) пример не будет работать.

Set objListObject = ActiveWorkbook.Worksheets(1).ListObjects.Add(SourceType:= xlSrcExternal, _ 
Source:= Array(strServerName, strListName, strListGUID), LinkSource:=True, _ 
XlListObjectHasHeaders:=xlGuess, Destination:=Range("A1")), 
TableStyleName:=xlGuess, Destination:=Range("A10")) 

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.