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


Метод Shapes.AddTable (Publisher)

Добавляет новый объект Shape , представляющий таблицу, в указанную коллекцию Shapes .

Синтаксис

expression. AddTable (NumRows, NumColumns, Left, Top, Width, Height, FixedSize, Direction)

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
NumRows Обязательный Long Количество строк в новой таблице. Допустимы значения от 1 до 128; любые значения за пределами этого диапазона создают ошибку.
NumColumns Обязательный Long Количество столбцов в новой таблице. Допустимы значения от 1 до 128; любые значения за пределами этого диапазона создают ошибку.
Left Обязательный Variant Положение левого края фигуры, представляющей таблицу.
Top Обязательный Variant Положение верхнего края фигуры, представляющей таблицу.
Width Обязательный Variant Ширина фигуры, представляющей таблицу.
Height Обязательный Variant Высота фигуры, представляющей таблицу.
Фиксированный размер Необязательный Логический Значение true, если Microsoft Publisher уменьшает количество строк и столбцов таблицы в соответствии с заданной шириной и высотой. Значение False, если publisher автоматически увеличивает ширину и высоту кадра таблицы для размещения количества строк и столбцов в таблице. Значение по умолчанию — False.
Направление Необязательный PbTableDirectionType Направление нумерации столбцов таблицы. Значение по умолчанию зависит от текущего параметра языка.

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

Shape

Примечания

Для аргументов Left, Top, Width и Height числовые значения вычисляются в пунктах; строки могут находиться в любых единицах, поддерживаемых Издателем (например, "2.5 in").

Параметр Direction может быть одной из констант PbTableDirectionType , объявленных в библиотеке типов издателя Майкрософт и показанных в следующей таблице.

Константа Описание
pbTableDirectionLeftToRight Столбцы таблицы нумеруются слева направо. По умолчанию для языков слева направо.
pbTableDirectionRightToLeft Столбцы таблицы нумеруются справа налево. По умолчанию для языков справа налево.

Пример

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

Dim shpTable As Shape 
 
Set shpTable = ActiveDocument.Pages(1).Shapes.AddTable _ 
 (NumRows:=3, NumColumns:=4, _ 
 Left:=10, Top:=10, _ 
 Width:=288, Height:=216) 

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

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