Como listar todos os comentários na pasta de trabalho atual para uma nova planilha ou pasta de trabalho no Excel?
Se você tem uma pasta de trabalho com muitos comentários e deseja listar todos os comentários em uma nova planilha ou pasta de trabalho para revisar todos os comentários, como pode fazer isso? Os seguintes métodos 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.
Use o código VBA para listar todos os comentários na pasta de trabalho atual para uma nova planilha
Use o código VBA para listar todos os comentários na pasta de trabalho atual para uma nova planilha
O seguinte código VBA listará todos os comentários na pasta de trabalho atual para uma nova planilha. 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. Por favor, use este método conforme as instruções a seguir:
1. Clique em "Desenvolvedor" > "Visual Basic", isso exibirá a janela "Microsoft Visual Basic for Applications". E clique em "Inserir" > "Módulo", e depois 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. Em seguida, clique
no botão para executar o código, e você obterá uma nova planilha com todos os comentários da pasta de trabalho atual. Veja a captura de tela:
Use Kutools para Excel para listar todos os comentários na pasta de trabalho atual para uma nova planilha ou pasta de trabalho
Com o recurso "Criar Lista de Comentários" do "Kutools para Excel", você pode listar rapidamente todos os comentários em uma nova planilha ou uma nova pasta de trabalho.
Kutools para Excel: com mais de 300 complementos úteis para o Excel, grátis para experimentar sem limitação por 30 dias. Obtenha-o Agora.
1. Se você já instalou o Kutools para Excel, clique em "Kutools" > "Mais" > "Criar Lista de Comentários."
2. Na caixa de diálogo "Criar Lista de Comentários":
- Selecione o escopo que você deseja listar os comentários, você pode escolher "Planilha Atual" ou "Todas as Planilhas".
- 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, veja a captura de tela:
3. E então clique no botão "Criar". 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élulas, linha e coluna. Veja a captura de tela:
Para mais informações detalhadas sobre "Criar Lista de Comentários", por favor, visite a descrição do recurso Criar 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
- Localizar e substituir texto dentro dos comentários
- Mostrar ou ocultar todos os comentários e indicadores de comentários no Excel
- Converter o conteúdo das células em comentários no Excel
- Converter comentários em conteúdo de células no Excel
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins