Метод Shape.DeleteRow (Visio)

Статья
04/07/2023

Удаляет строку из раздела таблицы фигур.

Синтаксис

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

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Section	Обязательный	Integer	Индекс раздела, содержащего строку.
Row	Обязательный	Integer	Индекс удаляемой строки.

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

Отсутствует

Примечания

Чтобы удалить по одной строке из раздела ShapeSheet, используйте метод DeleteRow . Если раздел содержит индексированные строки, строки, следующие за позицией смены удаленных строк. Если строка не существует, ничего не удаляется.

Не следует удалять строки, определяющие основные характеристики фигуры, такие как строка 1D Endpoints (visRowXForm1D), строка компонента (visRowComponent) или строка MoveTo (visRowVertex + 0) в разделе Geometry. Нельзя удалять строки из разделов, представленных visSectionCharacter, visSectionParagraph и visSectionTab.

Пример

В следующем макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать метод DeleteRow для удаления строки ShapeSheet.

Public Sub DeleteRow_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 of the rectangle. 
 vsoShape.AddSection visSectionScratch 
 
 'Add a row to the scratch section. 
 vsoShape.AddRow visSectionScratch, visRowScratch, 0 
 
 'Delete the row from the scratch section. 
 vsoShape.DeleteRow visSectionScratch, visRowScratch 
 
End Sub

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

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

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