VBA – Quebrar Texto Automaticamente

Written by

Mel Jenkins

Reviewed by

Steve Rynearson

Translated by

Daniel Caramello

Last updated on August 11, 2023

Neste tutorial, você aprenderá a ativar ou desativar a opção Quebrar Texto Automaticamente no Excel usando o VBA.

Quebra de Texto Usando o VBA

Para envolver o texto em uma célula ou intervalo, defina a propriedade Range.WrapText do objeto Range como True. O código a seguir envolverá o texto na célula A1:

Worksheets("Planilha1").Range("A1").WrapText = True

O resultado é o seguinte:

exemplo quebra texto

Você também pode envolver um intervalo maior de células:

Range("A1:A10").WrapText = True

Desativação da Quebra de Texto em uma Célula Usando o VBA

Você pode desativar a quebra de texto em uma determinada célula ou intervalo usando o VBA. O código a seguir desativará a quebra de texto na célula B2:

Range("B2").WrapText = False

Desativação da Quebra de Texto em uma Planilha Inteira

É possível desativar a quebra de texto em todas as células de uma planilha usando o VBA. O código a seguir permitirá que você desative a quebra de texto em todas as células da Planilha Atual:

Sub DesativarQuebraDeTexto()

 Cells.WrapText = False

End Sub
vba-free-addin

Exemplos de Add-ins de Códigos VBA

Acesse facilmente todos os exemplos de código que se encontram em nosso site.

Simply navigate to the menu, click, and the code will be inserted directly into your module. .xlam add-in.

(Nenhuma instalação necessária!)

Baixe de Graça

Retornar aos Exemplos de Códigos VBA