Método Comment.Next (Excel)
Retorna um objeto Comment representando o próximo comentário.
Sintaxe
expressão. Próximo
Expressão Uma expressão que retorna um objeto Comment .
Valor de retorno
Comentário
Comentários
Este método trabalha somente em uma planilha. O uso deste método no último comentário em uma planilha retorna Null (não o próximo comentário na próxima planilha).
Exemplo
Esse exemplo mostra cada segundo comentário, navegando com o próximo método.
Observação
Teste este exemplo em uma nova pasta de trabalho sem comentários existentes. Para limpar todos os comentários de uma pasta de trabalho, use Selection.SpecialCells(xlCellTypeComments).delete
no painel Imediato.
'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"
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.