Comment.Next-Methode (Excel)

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

Syntax

Ausdruck. Next

Ausdruck Ein Ausdruck, der ein Comment-Objekt zurückgibt.

Rückgabewert

Kommentar

Bemerkungen

Diese Methode funktioniert nur auf einem einzigen Blatt. Wird diese Methode auf den letzten Kommentar eines Blatts angewendet, so wird Null Null 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. Verwenden Sie den Direktbereich, um alle Kommentare aus einer Arbeitsmappe Selection.SpecialCells(xlCellTypeComments).delete zu löschen.

'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.