Método Comment.Next (Excel)

Devuelve un objeto Comment que representa el siguiente comentario.

Sintaxis

expresión. Siguiente

expresión Expresión que devuelve un objeto Comment.

Valor devuelto

Comentario

Comentarios

Este método sólo afecta a una hoja. Si se aplica este método al último comentario de una hoja, devuelve Null Null y no el primer comentario de la siguiente hoja.

Ejemplo

Este ejemplo muestra cada segundo comentario, navegando con el siguiente método.

Nota

Pruebe este ejemplo en un libro nuevo sin comentarios existentes. Para borrar todos los comentarios de un libro, use Selection.SpecialCells(xlCellTypeComments).delete en el panel Inmediato.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.