Auf Englisch lesen

Freigeben über


Zellenobjekt (PowerPoint)

Stellt eine Tabellenzelle dar. Das Cell -Objekt ist ein Mitglied der CellRange Auflistung. 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

Sie können zu einer PowerPoint-Tabelle durch ein Programm keine Zellen hinzufügen oder Zellen aus der Tabelle löschen. Mit der Add-Methode der Columns- oder Rows-Auflistung können Sie zu einer Tabelle eine Spalte oder Zeile hinzufügen. Mit der Delete-Methode der Columns- oder Rows-Auflistung können Sie eine Spalte oder Zeile aus einer Tabelle löschen.

Beispiel

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. Bei Einstellungen für Sprachen mit Schreibrichtung von rechts nach links verhält sich dieses Schema umgekehrt. Im folgenden Beispiel werden die ersten beiden Zellen in Zeile 1 der Tabelle in Form 5 von Folie 2 zusammengeführt.

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

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

End With

In diesem Beispiel wird die untere Rahmenlinie für Zelle 1 in der ersten Spalte der Tabelle als gestrichelte Linie formatiert.

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

        .Cells(1)

    .Borders(ppBorderBottom).DashStyle = msoLineDash

End With

Verwenden Sie die Shape-Eigenschaft, um auf das Shape-Objekt zuzugreifen und den Inhalt der einzelnen Zellen zu bearbeiten. 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

Methoden

Eigenschaften

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.