Column-Objekt (Word)
Stellt eine einzelne Tabellenspalte dar. Das Column -Objekt ist ein Element der Spalten Auflistung. Die Columns -Auflistung enthält alle Spalten in einer Tabelle, die Markierung oder den Bereich.
Verwenden Sie Columns (Index), wobei Index die Indexnummer ist, um ein einzelnes Column-Objekt zurückzugeben. Die Indexnummer stellt die Position der Spalte in der Columns -Auflistung dar (von links nach rechts gezählt).
Im folgenden Beispiel wird Spalte 1 in Tabelle 1 im aktiven Dokument ausgewählt.
ActiveDocument.Tables(1).Columns(1).Select
Verwenden Sie die Column-Eigenschaft mit einem Cell-Objekt , um ein Column-Objekt zurückzugeben. Im folgenden Beispiel wird der Text in Zelle 1 gelöscht, neuer Text eingefügt und anschließend die gesamte Spalte sortiert.
With ActiveDocument.Tables(1).Cell(1, 1)
.Range.Delete
.Range.InsertBefore "Sales"
.Column.Sort
End With
Verwenden Sie die Add -Methode, um eine Tabelle eine Spalte hinzuzufügen. Im folgenden Beispiel wird der ersten Tabelle im aktiven Dokument eine Spalte hinzugefügt und dann den Spalten die gleiche Breite zugewiesen.
If ActiveDocument.Tables.Count >= 1 Then
Set myTable = ActiveDocument.Tables(1)
myTable.Columns.Add BeforeColumn:=myTable.Columns(1)
myTable.Columns.DistributeWidth
End If
Hinweise
Verwenden Sie die Information-Eigenschaft mit einem Selection-Objekt , um die aktuelle Spaltennummer zurückzugeben. Im folgenden Beispiel wird die aktuelle Spalte markiert und anschließend die Spaltennummer in einem Meldungsfeld angezeigt.
If Selection.Information(wdWithInTable) = True Then
Selection.Columns(1).Select
MsgBox "Column " _
& Selection.Information(wdStartOfRangeColumnNumber)
End If
Name |
---|
Application |
Borders |
Zellen |
Creator |
Index |
IsFirst |
IsLast |
NestingLevel |
Next |
Parent |
PreferredWidth |
PreferredWidthType |
Previous |
Shading |
Width |
Referenz zum Word-Objektmodell
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.