Comment.Next-Methode (Excel)
Gibt ein Comment-Objekt zurück, das den nächsten Kommentar darstellt.
Syntax
Ausdruck. Nächster
Ausdruck Ein Ausdruck, der ein Comment-Objekt zurückgibt.
Rückgabewert
Kommentar
Hinweise
Diese Methode funktioniert nur auf einem einzigen Blatt. Wird diese Methode auf den letzten Kommentar eines Blatts angewendet, so wird NullNull zurückgegeben (und nicht der nächste Kommentar auf dem nächsten Blatt).
Beispiel
In diesem Beispiel wird jeder zweite Kommentar angezeigt und dazu mit der Next-Methode navigiert.
Hinweis
Testen Sie dieses Beispiel in einer neuen Arbeitsmappe ohne vorhandene Kommentare. Um alle Kommentare aus einer Arbeitsmappe zu löschen, verwenden Sie Selection.SpecialCells(xlCellTypeComments).delete
im Direktbereich.
'Sets up the comments
For xNum = 1 To 10
Range("A" & xNum).AddComment
Range("A" & xNum).Comment.Text Text:="Comment " & xNum
Next
MsgBox "Comments created... A1:A10"
'Deletes every second comment in the A1:A10 range
For yNum = 1 To 10 Step 2
Range("A" & yNum).Comment.Next.Shape.Select True
Selection.Delete
Next
MsgBox "Deleted every second comment"
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.