Depois de manipular uma planilha com o VBA, pode ser necessário ajustar automaticamente suas colunas para apresentar o melhor resultado final possível. Veja como ajustar automaticamente as colunas usando VBA.
Ajuste automático de coluna usando VBA
Este código ajusta automaticamente as colunas A e B. O ajuste automático é aplicado à planilha ativa.
| 1 | Colunas ("A: B"). ColunaIntotal.Autofit |
Ajustar automaticamente todas as colunas usadas
E se você quiser ajustar automaticamente todas as colunas usadas em uma planilha? Use o método acima em combinação com Contar o número de colunas usadas e um loop.
O código a seguir ajusta automaticamente todas as colunas usadas usando VBA:
| 1234567891011 | Sub AutofitAllUsed ()Dim x As IntegerPara x = 1 para ActiveSheet.UsedRange.Columns.CountColumns (x) .EntireColumn.autofitPróximo xEnd Sub |
