Column-Objekt (PowerPoint)
Stellt eine Tabellenspalte dar. Das Column -Objekt ist ein Mitglied der Columns -Auflistung. Die Columns -Auflistung enthält alle Spalten in einer Tabelle.
Beispiel
Verwenden Sie Spalten (Index), um ein einzelnes Column -Objekt zurückzugeben. Index stellt die Position der Spalte in der Columns -Auflistung (in der Regel von links nach rechts gezählt; zwar die Eigenschaft TableDirection dies stornieren kann). In diesem Beispiel wählt die erste Spalte der Tabelle in Form 5 auf der zweiten Folie.
ActivePresentation.Slides(2).Shapes(5).Table.Columns(1).Select
Mit dem Cell -Objekt können Sie indirekt auf das Column -Objekt verweisen. In diesem Beispiel wird der Text in der ersten Zelle (Reihe 1, Spalte 1) gelöscht, neuer Text eingefügt und dann die Breite der gesamten Spalte auf 110 Punkt gesetzt.
With ActivePresentation.Slides(2).Shapes(5).Table.Cell(1, 1)
.Shape.TextFrame.TextRange.Delete
.Shape.TextFrame.TextRange.Text = "Rooster"
.Parent.Columns(1).Width = 110
End With
Verwenden Sie die Add -Methode, um eine Tabelle eine Spalte hinzuzufügen. In diesem Beispiel wird eine Spalte in einer bestehenden Tabelle erstellt und die Spaltenbreite auf 72 Punkt (1 Zoll) festgelegt.
With ActivePresentation.Slides(2).Shapes(5).Table
.Columns.Add.Width = 72
End With
Verwenden Sie die Cells -Eigenschaft, um die einzelnen Zellen in ein Column -Objekt zu ändern. Dieses Beispiel wählt die erste Spalte in der Tabelle und die untere Rahmenlinie eine gestrichelte Linienart betrifft.
ActiveWindow.Selection.ShapeRange.Table.Columns(1) _
.Cells.Borders(ppBorderBottom).DashStyle = msoLineDash
Siehe auch
PowerPoint-Objektmodellreferenz
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für