Excel: Como expandir a célula para mostrar todo o conteúdo ao clicar

Em alguns casos, se o conteúdo da célula for maior que a largura da célula e houver valores nas próximas células da coluna, apenas partes do conteúdo serão mostradas conforme a captura de tela abaixo. Para evitar alterar a largura e a altura das células, você pode clicar na célula e visualizar todo o conteúdo na barra de fórmulas. Mas se a barra de fórmulas estiver oculta ou menor que o conteúdo, como fazer isso? Aqui apresenta dois métodos que podem mostrar o conteúdo da célula em uma caixa de texto ao clicar nela.

Expanda a célula para mostrar todo o conteúdo inserindo uma caixa de texto Active X Controls

Expanda a célula para mostrar todo o conteúdo usando a barra de fórmulas maior do Kutools para Excel

Nota: os métodos fornecidos neste tutorial são testados no Excel 2021, pode haver alguns diferentes em diferentes versões do Excel.

1. Ative a planilha que deseja expandir a célula, clique em Developer > inserção > Caixa de texto (controles ActiveX).

Se não há Developer guia na faixa de opções, exiba-a primeiro, consulte este tutorial Como mostrar/exibir a guia do desenvolvedor na faixa de opções do Excel

2. Em seguida, arraste o cursor para desenhar uma caixa de texto com largura e altura que possa mostrar o conteúdo mais longo das células. Lembre-se do nome desta caixa de texto, aqui está TextBox1.

3. Clique com o botão direito do mouse na caixa de texto e clique em Propriedades no menu de contexto. Então em Propriedades painel, escolha Verdadeiro das listas suspensas no MultiLinha e Quebra de linha Seções. Em seguida, feche o Propriedades painel.
  

Ou você pode selecionar True na lista suspensa em Tamanho automático seção no painel Propriedades, a caixa de texto será dimensionada automaticamente com base no comprimento do conteúdo da célula em que você clicar.

4. Clique com o botão direito do mouse na guia do nome da planilha na barra de status e clique em Ver código no menu de contexto.

5. No Microsoft Visual Basic para Aplicações janela, copie e cole o código abaixo no script em branco.

VBA: Expanda a célula para mostrar o conteúdo

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice
Dim xRgAddress As String
xRgAddress = "A1:B4" 'the range this VBA work, if you leave it is blank, it work for whole sheet
If xRgAddress = "" Then
  With TextBox1
        .Top = Target.Top
        .Left = Target.Offset(, 1).Left
        .Text = Target.Text
        .Visible = True
    End With
Else
    If Intersect(Target, Range(xRgAddress)) Is Nothing Then
        TextBox1.Visible = False
    Else
        With TextBox1
            .Top = Target.Top
           .Left = Target.Offset(, 1).Left
            .Text = Target.Text
            .Visible = True
        End With
    End If
End If
End Sub

Observe que TextBox1 é o nome da caixa de texto que você desenhou, e A1:B4 é o intervalo em que esse código funciona, altere-os conforme necessário.

6. Volte para a planilha, clique em Developer > Modo de design existir o modo de projeto.

Agora, quando você clicar na célula, a caixa de texto aparecerá ao lado dela e mostrará todo o conteúdo da célula.

Se você instalou o Kutools for Excel, a barra de fórmulas maior fornecida mostrará todo o conteúdo da célula em uma caixa pop-up quando você clicar, desde que você a ative clicando Kutools > Maior Barra de Fórmula.

Dicas:

1. Com a Barra de Fórmulas Maior, exceto para visualizar o conteúdo da célula ativa, você também pode editar o conteúdo da célula na Barra de Fórmulas Maior.

2. Você pode redimensionar a Barra de Fórmula Maior arrastando o canto inferior direito da Barra.

3. Se você selecionar mais de uma célula, apenas o conteúdo da primeira célula da seleção será mostrado na Barra de Fórmula Maior.

Mais detalhes sobre Bigger Formula Bar, visite seu tutorial.

---

As melhores ferramentas de produtividade para escritório

O Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

• Barra Super Fórmula (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
• Mesclar células / linhas / colunas e manutenção de dados; Dividir o conteúdo das células; Combine Linhas Duplicadas e Soma / Média... Evite células duplicadas; Comparar intervalos...
• Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
• Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
• Fórmulas favoritas e de inserção rápida, Intervalos, gráficos e imagens; Criptografar células com senha; Criar lista de discussão e enviar emails ...
• Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
• Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
• Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
• Agrupamento de tabela dinâmica por número da semana, dia da semana e mais ... Mostrar células desbloqueadas, bloqueadas por cores diferentes; Destacar células que possuem fórmula / nome...

Leia mais... Full Features 30-Day Free Trial ... Compra... 

---

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!

Leia mais... Full Features 30-Day Free Trial ... Compra...