Como ajustar automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo no Excel?

Ao inserir comentários em células, o tamanho da caixa de comentário é o padrão. Se você inserir muito conteúdo nela, parte do conteúdo não será visível diretamente. É possível ajustar automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo?

Ajustar automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo em uma planilha
Ajustar automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo em um intervalo de células
Ajuste automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo na planilha ativa ou em todas as planilhas com uma ferramenta incrível

Ajustar automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo em uma planilha

No Excel, você pode redimensionar manualmente a caixa de comentário arrastando-a para o tamanho desejado, uma por uma. No entanto, se houver muitas caixas de comentário que precisam ser redimensionadas, esse método será tedioso e demorado. Nesse caso, você pode aplicar o seguinte código VBA.

1. Pressione e segure as teclas ALT + F11, e isso abrirá a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole a seguinte macro na janela Módulo.

Código VBA: Ajustar automaticamente o tamanho das caixas de comentário em uma planilha

Sub FitComments()
'Updateby20140325
Dim xComment As Comment
For Each xComment In Application.ActiveSheet.Comments
    xComment.Shape.TextFrame.AutoSize = True
Next
End Sub

3. Em seguida, pressione a tecla F5 para executar este código, e todas as caixas de comentário na planilha ativa terão seus tamanhos ajustados para se adequarem aos seus conteúdos, conforme mostrado na captura de tela a seguir:

Dica: Este código só funciona na planilha atual e não pode redimensionar automaticamente as novas caixas de comentário que você adicionar.

Ajustar automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo em um intervalo de células

Se você precisa ajustar automaticamente o tamanho de um intervalo de caixas de comentário de células, pode usar o seguinte código VBA.

1. Pressione e segure as teclas ALT + F11, e isso abrirá a janela Microsoft Visual Basic for Applications.

2. Clique em Inserir > Módulo e cole a seguinte macro na janela Módulo.

Código VBA: Ajustar automaticamente o tamanho das caixas de comentário em um intervalo de células

Sub Fitrangecomments()
'Updateby20140325
Dim rng As Range
Dim WorkRng As Range
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
    If Not rng.Comment Is Nothing Then
        rng.Comment.Shape.TextFrame.AutoSize = True
    End If
Next
End Sub

3. Em seguida, pressione a tecla F5 para executar este código, e uma caixa de prompt aparecerá para lembrá-lo de selecionar um intervalo de células cujas caixas de comentário deseja redimensionar, veja a captura de tela:

4. Depois, clique em OK, e suas caixas de comentário selecionadas serão ajustadas automaticamente ao conteúdo dos comentários.

Dica: Este código não pode redimensionar automaticamente as novas caixas de comentário que você adicionar.

Ajustar automaticamente o tamanho da caixa de comentário para se adequar ao seu conteúdo na planilha ativa ou em todas as planilhas 

Você pode experimentar o AutoFit Comment utilitário do Kutools para Excel para redimensionar automaticamentetodas as caixas de comentário na planilha ativa ou em todas as planilhas no Excel. Por favor, siga os passos abaixo.

1. Para redimensionar automaticamente as caixas de comentário para se ajustarem ao seu conteúdo na planilha ativa, clique em Kutools > Mais > AutoFit Comment > Planilha Atual.

E se você quiser redimensionar automaticamente todas as caixas de comentário em toda a pasta de trabalho, clique em Kutools > Mais > AutoFit Comment > Todas as Planilhas. Veja a captura de tela:

Em seguida, todas as caixas de comentário são redimensionadas automaticamente para se ajustarem aos seus conteúdos. Veja a captura de tela:

Notas:

• 1. Após o redimensionamento automático das caixas de comentário, ao editar novamente o comentário, a caixa de comentário será expandida ou reduzida automaticamente com o conteúdo.
• 2. Para os novos comentários inseridos, você precisará habilitar novamente este utilitário AutoFit Comment para redimensionar todas as novas caixas de comentário inseridas.

Artigos relacionados:

• Como alterar a forma da caixa de comentário no Excel?
• Como alterar todos os formatos de comentário nas células no Excel?
• Como listar todos os comentários em uma nova planilha ou pasta de trabalho no Excel?
• Como inserir uma imagem ou figura em um comentário no Excel?