Shape.AddRow, méthode (Visio)

Ajoute une ligne à une section de la feuille ShapeSheet, à une position spécifiée.

Syntaxe

expression. AddRow( _Section_ , _Row_ , _RowTag_ )

expression Une variable qui représente uneForme d’objet.

Paramètres

Valeur renvoyée

Entier

Remarques

Si la section de la feuille ShapeSheet n'existe pas encore, elle est créée avec une ligne vide. Les cellules des nouvelles lignes sont initialisées à l'aide de formules par défaut, si nécessaire. Dans le cas contraire, un programme doit inclure des instructions pour définir les formules des nouvelles cellules. Si la nouvelle ligne ne peut pas être ajoutée, une erreur est générée.

La bibliothèque de types Visio déclare des constantes de ligne ayant le préfixe visRow dans VisRowIndices.

Les constantes de lignes dans les sections Geometry, Connection Points et Controls ont le préfixe visTag et sont déclarées par la bibliothèque de types Visio dans VisRowTags. Pour voir une liste de ces constantes, reportez-vous à la propriété RowType.

Les constantes de ligne déclarées par la bibliothèque de types Visio servent de positions de base à partir des lignes d’une section. Ajoutez des décalages à ces constantes pour spécifier la première ligne et au-delà, par exemple visRowFirst +0, visRowFirst +1, etc. Pour ajouter des lignes à la fin d’une section, passez la constante visRowLast pour l’argument Row . La valeur retournée est l’index de ligne réel.

L'argument BaliseLigne indique le type de ligne à ajouter. Pour générer le type de ligne par défaut d'une section, transmettez visTagDefault (0) comme argument BaliseLigne. Les balises explicites sont utiles lors de l'ajout de lignes aux sections Geometry, Connection Points et Controls. Reportez-vous à la propriété RowType pour des descriptions des types de lignes valides pour ces sections. La transmission d'un type de ligne non valide génère une erreur.

Si vous essayez d'ajouter une ligne à une section Character, Tabs ou Paragraph, une erreur se produit.

La méthode AddRow ne peut ajouter de lignes nommées. Pour ajouter des lignes nommées, utilisez la méthode AddNamedRow.

Si vous ajoutez des lignes à une section qui a des lignes pouvant être nommées (par exemple, la section Points de connexion ou Contrôles), l’argument Ligne est ignoré. Par défaut, les lignes nommées sont nommées dans l’ordre ajouté, par exemple, Row_1, Row_2, etc. Toutefois, l’ordre de nommage est influencé par les lignes existantes ou les lignes précédemment supprimées.

Exemple

L'exemple suivant indique comment ajouter une section à une feuille ShapeSheet et une ligne à la section à une position spécifiée.

 
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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.