Метод Shape.AddRow (Visio)

Добавляет строку в раздел таблицы фигур в указанной позиции.

Синтаксис

выражение. AddRow( _Section_ , _Row_ , _RowTag_ )

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
Section Обязательный Integer Раздел, в который добавляется строка.
Row Обязательный Integer Позиция, в которой добавляется строка.
RowTag Обязательный Integer Тип добавляемой строки.

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

Целое число

Замечания

Если раздел Таблица фигур еще не существует, он создается с пустой строкой. Новые ячейки в новых строках инициализируются с помощью формул по умолчанию, если применимо. В противном случае программа должна включать инструкции для задания формул для новых ячеек. Если новая строка не может быть добавлена, возникает ошибка.

Библиотека типов Visio объявляет константы строк с префиксом visRow в VisRowIndices.

Константы для строк в разделах Geometry, Connection Points и Controls имеют префикс visTag и объявляются библиотекой типов в VisRowTags. Список этих констант см. в свойстве RowType .

Константы строк, объявленные библиотекой типов Visio, служат базовыми позициями, с которых начинаются строки раздела. Добавьте смещения в эти константы, чтобы указать первую строку и за ее пределами, например visRowFirst +0, visRowFirst +1 и т. д. Чтобы добавить строки в конце раздела, передайте константу visRowLast для аргумента Row . Возвращаемое значение — фактический индекс строки.

Аргумент RowTag указывает тип добавляемой строки. Чтобы создать тип строки раздела по умолчанию, передайте visTagDefault (0) в качестве аргумента RowTag . Явные теги полезны при добавлении строк в разделы Geometry, Точки подключения и Элементы управления. Описание допустимых типов строк для этих разделов см. в свойстве RowType . Передача недопустимого типа строки приводит к ошибке.

При попытке добавить строку в раздел символа, табуляции или абзаца возникает ошибка.

Метод AddRow не может добавлять именованные строки. Чтобы добавить именованные строки, используйте метод AddNamedRow .

При добавлении строк в раздел с именуемыми строками (например, в разделе Точки подключения или Элементы управления) аргумент Row игнорируется. По умолчанию именованные строки именуются в порядке добавления, например Row_1, Row_2 и т. д. Однако на порядок именования влияют все существующие строки или ранее удаленные строки.

Пример

В следующем примере показано, как добавить раздел в таблицу фигур и как добавить строку в раздел в указанной позиции.

 
Public Sub AddRow_Example() 
 
 Dim vsoPage As Visio.Page 
 Dim vsoShape As Visio.Shape 
 
 'Get the active page. 
 Set vsoPage = ActivePage 
 
 'If there isn't an active page, set the Page object 
 'to the first page of the active document. 
 If vsoPage Is Nothing Then 
 Set vsoPage = ActiveDocument.Pages(1) 
 End If 
 
 'Draw a rectangle on the active page. 
 Set vsoShape = vsoPage.DrawRectangle(1, 5, 5, 1) 
 
 'Add a scratch section to the ShapeSheet. 
 vsoShape.AddSection visSectionScratch 
 
 'Add a row to the scratch section. 
 vsoShape.AddRow visSectionScratch, visRowScratch, 0 
 
End Sub

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

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