Método Comment.Next (Excel)

Devuelve un objeto Comment que representa el siguiente comentario.

Sintaxis

expresión. Próximo

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

Valor devuelto

Comentario

Observaciones

Este método sólo afecta a una hoja. Si se aplica este método al último comentario de una hoja, devuelve NullNull 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 nuevo libro 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.