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

HinwBemerkungeneise

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.