Table.Columns-Eigenschaft (PowerPoint)
Gibt eine Columns -Auflistung zurück, die alle Spalten in einer Tabelle darstellt. Schreibgeschützt.
Syntax
Ausdruck. Spalten
Ausdruck Eine Variable, die ein Table-Objekt darstellt.
Rückgabewert
Spalten
Hinweise
Informationen zum Zurückgeben eines einzelnen Elements einer Auflistung finden Sie unter Zurückgeben eines Objekts aus einer Auflistung.
Beispiel
In diesem Beispiel wird die Nummer der Form, die Foliennummer und die Anzahl der Spalten in der ersten Tabelle der aktiven Präsentation angezeigt.
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
In diesem Beispiel wird die ausgewählte Form daraufhin überprüft, ob diese eine Tabelle enthält. Wenn dies der Fall ist, stellt der Code die Breite der Spalte 1 auf 72 Punkt (1 Zoll, ca. 2,54 cm) ein.
With ActiveWindow.Selection.ShapeRange
If .HasTable = True Then
.Table.Columns(1).Width = 72
End If
End With
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.