Compartir a través de

Método Shape.DeleteRow (Visio)

  • Artículo

Elimina una fila de una sección en una hoja de cálculo ShapeSheet.

Sintaxis

expresión. DeleteRow( _Section_ , _Row_ )

Expresión Variable que representa un objeto Shape .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
Section Obligatorio Integer Índice de la sección que contiene la fila.
Fila Obligatorio Integer Índice de la fila que se desea eliminar.

Valor devuelto

Nothing

Comentarios

Para quitar una sola fila de una sección de ShapeSheet, se utiliza el método DeleteRow. Si la sección tiene filas indizadas, las filas siguientes a la fila eliminada cambiarán de posición. Si la fila no existe, no se elimina nada.

No debe eliminar filas que definan características fundamentales de una forma, como la fila Puntos de conexión 1D (visRowXForm1D) o la fila del componente (visRowComponent) o la fila MoveTo (visRowVertex + 0) en una sección Geometry. No se pueden eliminar las filas de las secciones representadas por visSectionCharacter, visSectionParagraph y visSectionTab.

Ejemplo:

En la siguiente macro de Microsoft Visual Basic para Aplicaciones (VBA) se muestra cómo utilizar el método DeleteRow para eliminar una fila de 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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.