Como redefinir todas as posições de comentários no Excel?
Em uma planilha que é preenchida com vários comentários, às vezes, precisamos ajustar ou mover a posição da caixa de comentários para visualizar o conteúdo da célula atrás da caixa de comentários, neste caso, as caixas de comentários serão movidas para posições diferentes. Depois de terminar a operação, você precisa retornar as caixas de comentários à posição original. Como você poderia redefinir todas as posições de comentários de uma vez no Excel?
Redefina todas as posições da caixa de comentários com o código VBA no Excel
Um clique para redefinir todas as posições da caixa de comentários com o Kutools para Excel
Redefina todas as posições da caixa de comentários com o código VBA no Excel
Você pode aplicar o seguinte código VBA para restaurar todas as caixas de comentários para suas posições originais de uma vez.
1. Segure o ALT + F11 chaves para abrir o Janela Microsoft Visual Basic for Applications.
2. Clique inserção > Móduloe cole o seguinte código no Janela Módulo.
Código VBA: redefina todas as posições de comentários na planilha ativa
Sub ResetComments()
'Update 20141110
Dim pComment As Comment
For Each pComment In Application.ActiveSheet.Comments
pComment.Shape.Top = pComment.Parent.Top + 5
pComment.Shape.Left = pComment.Parent.Offset(0, 1).Left + 5
Next
End Sub
3. Então aperte F5 para executar este código, e todas as posições de comentários na planilha ativa foram redefinidas de uma vez. Veja as capturas de tela:
Redefina todas as posições da caixa de comentários com apenas um clique
Aqui, apresentamos o Reiniciar posição de comentário utilidade de Kutools for Excel. Com este utilitário, você pode redefinir rapidamente todas as posições de comentários na página ativa ou em todas as páginas com apenas um clique.
Antes de aplicar Kutools for Excel, Por favor baixe e instale primeiro.
1. Se você apenas deseja redefinir todas as posições da caixa de comentários na planilha ativa, clique Kutools > Mais > Reiniciar posição de comentário > Folha ativa.
Para redefinir todas as posições da caixa de comentários em todas as planilhas da pasta de trabalho atual, clique em Kutools > Mais > Reiniciar posição de comentário > Todas as folhas. Veja a imagem:
Após clicar em Folha ativa ou Todas as folhas, todas as posições de comentários na folha ativa ou em todas as folhas serão redefinidas para suas posições originais imediatamente.
Se você quiser ter um teste gratuito (30 dias) deste utilitário, por favor clique para fazer o downloade, em seguida, aplique a operação de acordo com as etapas acima.
Um clique para redefinir todas as posições da caixa de comentários com o Kutools para Excel
Artigos relacionados:
- Como alterar a cor do indicador de comentário no Excel?
- Como destacar todas as células com comentários no Excel?
- Como adicionar data e hora automaticamente para comentar 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!