Teilen über


CellRange-Objekt (PowerPoint)

Eine Auflistung von Cell -Objekten in einer Tabellenspalte oder -Zeile. Die CellRange -Auflistung stellt alle Zellen in der angegebenen Spalte oder Zeile. Wenn Sie die CellRange-Auflistung verwenden möchten, verwenden Sie das Schlüsselwort Cells.

Hinweise

Obwohl das Auflistungsobjekt CellRange heißt und im Objektbrowser angezeigt wird, wird dieses Schlüsselwort beim Programmieren von PowerPoint-Objektmodell nicht verwendet. Stattdessen wird das Schlüsselwort Zellen verwendet.

Sie können nicht programmgesteuert Zellen hinzufügen oder Löschen von Zellen aus einer PowerPoint-Tabelle. Verwenden der AddTable -Methode mit der Table -Objekt an eine neue Tabelle hinzufügen. Verwenden Sie die Add -Methode der Spalten oder Rows -Auflistung, um einer Spalte oder Zeile einer Tabelle hinzugefügt. Mit der Delete-Methode der Columns- oder Rows-Auflistung können Sie eine Spalte oder Zeile aus einer Tabelle löschen.

Beispiel

Verwenden Sie die Cells -Eigenschaft, um der CellRange -Auflistung zurückzugeben. In diesem Beispiel wird die rechte Rahmenlinie für die Zellen in der ersten Spalte der Tabelle als gestrichelte Linie formatiert.

With ActivePresentation.Slides(2).Shapes(5).Table.Columns(1).Cells

    .Borders(ppBorderRight).DashStyle = msoLineDash

End With

In diesem Beispiel wird die Anzahl der Zellen in Zeile 1 der ausgewählten Tabelle zurückgegeben.

num = ActiveWindow.Selection.ShapeRange.Table.Rows(1).Cells.Count

Verwenden Sie Zelle (Zeile, Spalte), wobei Zeile die Zeilennummer und Spalte die Spaltennummer ist, oder Cells (Index), wobei index die Nummer der Zelle in der angegebenen Zeile oder Spalte ist, um ein einzelnes Cell-Objekt zurückzugeben. Zellen werden von links nach rechts in Zeilen und von oben nach unten in Spalten nummeriert. Mit rechts-nach-links-Sprache-Einstellungen nummeriert. Im folgenden Beispiel verbindet die ersten beiden Zellen in Zeile 1 der Tabelle in Form 5 auf Folie 2.

With ActivePresentation.Slides(2).Shapes(5).Table

    .Cell(1, 1).Merge MergeTo:=.Cell(1, 2)

End With

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.