Como listar todos os comentários para uma nova planilha ou pasta de trabalho no Excel?
Se você tiver uma pasta de trabalho com muitos comentários e quiser listar todos os comentários em uma nova planilha ou pasta de trabalho para revisar todos os comentários, como você pode fazer? Os métodos a seguir podem ajudá-lo a listar rapidamente todos os comentários de uma planilha / pasta de trabalho em uma nova planilha ou pasta de trabalho no Excel.
Liste todos os comentários para uma nova planilha com código VBA
Liste todos os comentários em uma nova planilha ou pasta de trabalho com o Kutools para Excel
Liste todos os comentários para uma nova planilha com código VBA
O código VBA a seguir listará todos os comentários para uma nova planilha na pasta de trabalho atual. Na nova planilha, ele listará todos os comentários de toda a pasta de trabalho em uma lista com o nome da planilha, endereço da célula, conteúdo do comentário e nome da célula. Use este método da seguinte maneira:
1. Clique Developer > Visual Basic, ele exibe o Microsoft Visual Basic para aplicativos janela. E clique inserção > Móduloe, a seguir, insira os seguintes códigos VBA no módulo.
VBA: lista todos os comentários em uma nova planilha.
Sub ShowCommentsAllSheets()
'Update 20140508
Dim commrange As Range
Dim rng As Range
Dim ws As Worksheet
Dim newWs As Worksheet
Set newWs = Application.Worksheets.Add
newWs.Range("A1").Resize(1, 4).Value = Array("Sheet", "Address", "Value", "Comment")
Application.ScreenUpdating = False
On Error Resume Next
For Each ws In Application.ActiveWorkbook.Worksheets
Set commrange = ws.Cells.SpecialCells(xlCellTypeComments)
If Not commrange Is Nothing Then
i = newWs.Cells(Rows.Count, 1).End(xlUp).Row
For Each rng In commrange
i = i + 1
newWs.Cells(i, 1).Resize(1, 4).Value = Array(ws.Name, rng.Address, rng.Value, rng.Comment.Text)
Next
End If
Set commrange = Nothing
Next
newWs.Cells.WrapText = False
Application.ScreenUpdating = True
End Sub
2. Então clique para executar o código e você obterá uma nova planilha com todos os comentários da pasta de trabalho atual. Veja a imagem:
Liste todos os comentários para uma nova planilha ou pasta de trabalho com um clique
Com o Criar lista de comentários of Kutools for Excel, você pode listar rapidamente todos os comentários para uma nova planilha ou uma nova pasta de trabalho.
Kutools for Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Get it Now.
1. Se você instalou o Kutools para Excel, clique em Kutools > Mais > Criar lista de comentários, veja a captura de tela:
2. No Criar lista de comentários caixa de diálogo:
- Selecione o escopo que você deseja listar o comentário, você pode escolher Folha ativa or Todas as folhas.
- Em seguida, especifique o local onde deseja colocar a lista de comentários, você pode listar os comentários em uma nova pasta de trabalho ou uma nova planilha, consulte a captura de tela:
3. E, em seguida, clique em Criebotão. Uma nova planilha será adicionada para listar todos os comentários da planilha ativa com seus atributos, como nome da planilha, referências de célula, linha e coluna. Veja a imagem:
Para obter informações mais detalhadas sobre Criar lista de comentários, Visite Criar descrição do recurso da lista de comentários.
Artigos relacionados:
- Alterar todos os formatos de comentários nas células
- Alterar o nome do autor de todos os comentários
- Encontre e substitua o texto nos comentários
- Mostrar ou ocultar todos os comentários e indicadores de comentários no Excel
- Converta o conteúdo da célula em comentários no Excel
- Converter comentários em conteúdos de células no Excel
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!