Propiedad Shape.Table (Publisher)

Devuelve un objeto Table que representa una tabla en Microsoft Publisher.

Sintaxis

expresión. Mesa

expresión Variable que representa un objeto Shape.

Ejemplo

En el siguiente ejemplo se agrega una tabla de 5x5 a la primera página de la publicación activa y, a continuación, se selecciona la primera columna de la tabla nueva.

Sub NewTable() 
 With ActiveDocument.Pages(1).Shapes.AddTable(NumRows:=5, _ 
 NumColumns:=5, Left:=72, Top:=300, Width:=400, Height:=100) 
 .Table.Columns(3).Cells(3).Fill.ForeColor.RGB = RGB _ 
 (Red:=255, Green:=0, Blue:=0) 
 End With 
End Sub

En el siguiente ejemplo se selecciona la tabla especificada en la publicación activa. En este ejemplo se supone que existe al menos una forma en la primera página de la publicación activa.

Sub SelectTable() 
 With ActiveDocument.Pages(1).Shapes(1) 
 If .Type = pbTable Then 
 .Table.Rows(3).Cells(3).Fill.ForeColor _ 
 .RGB = RGB(Red:=150, Green:=150, Blue:=150) 
 End If 
 End With 
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.