Muitas vezes, no Excel, se faz necessário manipular o tamanho de uma área selecionada. Para isso, o VBA disponibiliza a Propriedade Resize com a qual você poderá redimensionar uma seleção em sua planilha. Confira!
A sua estrutura é: referência.Resize(número de linhas, número de colunas )
Vejamos essa propriedade aplicada no código abaixo. Nele, sem a propriedade Resize, a seleção seria apenas da célula "B20". No entanto, com o acrescimo da propriedade Resize, a mesma seleção será estendida por mais 3 linhas para baixo e 4 colunas para a direita.
Sub TesteResize01()
Range("B20").Resize(3, 4 ).Select
End Sub
Caso você deseje redimensionar apenas linhas, bastará inserir apenas o número referente as linhas. No código abaixo, a seleção será redimensionada por 3 linhas.
Sub TesteResize02()
Range("B20").Resize( 3 ).Select
End Sub
No entanto, caso se deseje redimensionar apenas as colunas, bastará inserir o número referente as colunas precedido de uma vírgula. No código abaixo, a seleção será redimensionada por 4 colunas.
Range("B20").Resize( ,4 ).Select
End Sub
É possível agrupar em uma mesma linha de código o método offset e a propriedade Resize. No código 4, a macro irá primeiro selecionar a célula que estiver duas linhas abaixo e uma coluna a direita e relação a "B20". Em seguida irá redimensionar esse seleção por duas linhas e três colunas.
Sub TesteResize04()
Range("B20").Offset(2, 1).Resize(2 ,3 ).Select
End Sub
Para maiores dúvidas, recomendamos assistir ao nosso vídeo:
Este vídeo e seus códigos também poderão ser vistos na página que trata de "Excel VBA básico". Para encontrá-los, clique em "Home" e, em seguida, use o "Mapa do Blog".