Klasse Comment - Zellkommentar (Excel VBA)

Die Klasse Comment stellt einen Zellkommentar dar. Um eine Comment -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise


Dim cmm as Comment
Set cmm = ActiveCell.Comment

For Each

Hier ist ein Beispiel für die Verarbeitung der Comment -Elemente in einer Sammlung


Dim cmm As Comment
For Each cmm In Application.Comments
	
Next cmm

Author

Gibt den Autor des Kommentars zurück.


Dim strAuthor As String
strAuthor = ActiveCell.Comment.Author

Delete

Löscht das Objekt.


ActiveCell.Comment.Delete

Next

Gibt ein Comment-Objekt zurück, das den nächsten Kommentar darstellt.

Diese Methode funktioniert nur auf einem einzigen Blatt.


Dim cmmNext As Comment
Set cmmNext = ActiveCell.Comment.Next()

Previous

Gibt ein Comment-Objekt zurück, das den vorherigen Kommentar darstellt.

Diese Methode funktioniert nur auf einem einzigen Blatt.


Dim cmmPrevious As Comment
Set cmmPrevious = ActiveCell.Comment.Previous()

Shape

Gibt ein Shape -Objekt zurück, das die Form darstellt, die dem angegebenen Kommentar zugeordnet ist.


Dim shpShape As Shape
Set shpShape = ActiveCell.Comment.Shape

Text

Legt den Kommentartext fest.

Text (Text, Start, Overwrite)


Dim strText As String
strText = ActiveCell.Comment.Text()

Arguments

Optional arguments

Die folgenden Argumente sind optional

Text (String) - Der hinzuzufügende Text.

Start (Long) - Die Nummer des Zeichens, bei dem der neue Text hinzugefügt wird.

Overwrite (Boolean) - False , wenn der Text eingefügt werden soll.

Visible

Gibt einen Boolean-Wert zurück, der bestimmt, ob das Objekt sichtbar ist, oder legt diesen Wert fest.


ActiveCell.Comment.Visible = True