Compartilhar via


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.