Propiedad Table.Columns (PowerPoint)

Devuelve una colección Columns que representa todas las columnas de una tabla. Solo lectura.

Sintaxis

expresión. Columnas

expresión Variable que representa un objeto Table .

Valor devuelto

Columnas

Observaciones

Para obtener información sobre cómo devolver un único miembro de una colección, vea Devolver un objeto de una colección.

Ejemplo

Este ejemplo muestra el número de forma, de diapositiva y de columnas de la primera tabla de la presentación activa.

Dim ColCount As Integer

Dim sl As Integer

Dim sh As Integer



With ActivePresentation

    For sl = 1 To .Slides.Count
        For sh = 1 To .Slides(sl).Shapes.Count
            If .Slides(sl).Shapes(sh).HasTable Then
                ColCount = .Slides(sl).Shapes(sh) _
                    .Table.Columns.Count

                MsgBox "Shape " & sh & " on slide " & sl & _
                    " contains the first table and has " & _
                    ColCount & " columns."

                Exit Sub
            End If
        Next
    Next

End With

Este ejemplo comprueba la forma seleccionada para ver si contiene una tabla. Si es así, el código establece el ancho de la columna uno en 72 puntos (una pulgada).

With ActiveWindow.Selection.ShapeRange

    If .HasTable = True Then

       .Table.Columns(1).Width = 72

    End If

End With

Vea también

Objeto Table

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.