Anmerkung
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Eine Auflistung von Cell-Objekten in einer Tabellenspalte, Tabellenzeile, Auswahl oder einem Bereich.
Hinweise
Mit der Cells-Eigenschaft wird die Cells-Auflistung zurückgegeben. Im folgenden Beispiel werden die Zellen der ersten Zeile in Tabelle 1 des aktiven Dokuments auf eine Breite von 30 Punkt gesetzt.
ActiveDocument.Tables(1).Rows(1).Cells.Width = 30
Im folgenden Beispiel wird die Anzahl der Zellen in der aktuellen Zeile zurückgegeben.
num = Selection.Rows(1).Cells.Count
Verwenden Sie die Add-Methode, um der Cells-Auflistung ein Cell-Objekt hinzuzufügen. Sie können auch die InsertCells -Methode des Selection -Objekts verwenden, um neue Zellen einzufügen. Im folgenden Beispiel wird vor der ersten Zelle in "myTable" eine Zelle hinzugefügt.
Set myTable = ActiveDocument.Tables(1)
myTable.Range.Cells.Add BeforeCell:=myTable.Cell(1, 1)
Verwenden Sie Zelle (Zeile, Spalte), wobei Zeile die Zeilennummer und Spalte die Spaltennummer ist, oder Zellen (Index), wobei Index die Indexnummer ist, um ein Cell-Objekt zurückzugeben. Im folgenden Beispiel wird die zweite Zelle der ersten Zeile mit einer Schattierung versehen.
Set myCell = ActiveDocument.Tables(1).Cell(Row:=1, Column:=2)
myCell.Shading.Texture = wdTexture20Percent
Im folgenden Beispiel wird die erste Zelle der ersten Zeile mit einer Schattierung versehen.
ActiveDocument.Tables(1).Rows(1).Cells(1).Shading _
.Texture = wdTexture20Percent
Hinweise
Verwenden Sie die Add-Methode mit der Rows- oder Columns-Auflistung , um eine Zeile oder Spalte mit Zellen hinzuzufügen. Im folgenden Beispiel werden im aktiven Dokument der ersten Tabelle eine Spalte und anschließend in die erste Spalte Zahlen eingefügt.
Set myTable = ActiveDocument.Tables(1)
Set aColumn = myTable.Columns.Add(BeforeColumn:=myTable.Columns(1))
For Each aCell In aColumn.Cells
aCell.Range.Delete
aCell.Range.InsertAfter num + 1
num = num + 1
Next aCell
Methoden
| Name |
|---|
| Add |
| AutoFit |
| Delete |
| DistributeHeight |
| DistributeWidth |
| Item |
| Merge |
| SetHeight |
| SetWidth |
| Split |
Eigenschaften
| Name |
|---|
| Application |
| Borders |
| Count |
| Creator |
| Height |
| HeightRule |
| NestingLevel |
| Parent |
| PreferredWidth |
| PreferredWidthType |
| Shading |
| VerticalAlignment |
| Width |
Siehe auch
Referenz zum Word-Objektmodell
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.