Já examinamos o que são variáveis e constantes em nosso tutorial Tipos de dados VBA - Variáveis e constantes. Agora vamos examinar o objeto de intervalo no VBA e como declarar uma variável como um objeto de intervalo. O objeto de intervalo é usado para denotar células ou várias células no VBA. Portanto, é muito útil para usar em seu código.
Clique aqui para obter mais informações sobre intervalos e células do VBA.
O objeto Range VBA
Você pode usar o objeto intervalo para se referir a uma única célula. Por exemplo, se você quiser se referir à célula A1 em seu código VBA, poderá usar o objeto de intervalo VBA conforme mostrado no código abaixo:
1234 | Sub ReferringToASingleCellUsingTheRangeObject ()Intervalo ("A1"). Valor = 89Intervalo ("A1"). Font.Bold = TrueEnd Sub |
Quando você pressiona run ou F5 em seu teclado, para executar seu código, você obtém o seguinte resultado, em sua planilha real:
Você pode usar o objeto intervalo para se referir a várias células ou intervalos. Por exemplo, se você quiser se referir ao intervalo de células (A1: C1) em seu código VBA, poderá usar o objeto de intervalo VBA conforme mostrado no código abaixo:
123456 | Sub ReferringToMultipleCellsUsingTheRangeObject ()Intervalo ("A1: C1"). Valor = "ABC"Intervalo ("A1: C1"). Bordas (xlEdgeBottom) .LineStyle = xlDoubleEnd Sub |
Quando você pressiona run ou F5 em seu teclado, para executar seu código, você obtém o seguinte resultado, em sua planilha real:
Declarando uma variável como um intervalo
Você precisará usar as palavras-chave Dim e Set ao declarar uma variável como um intervalo. O código a seguir mostra como declarar uma variável como um intervalo.
123456789101112 | Sub DeclaringAndSettingARange ()Dim rng como alcanceDefinir rng = intervalo ("A10: B10")rng.Value = "AutomateExcel"rng.Font.Bold = Truerng.Selectrng.Columns.AutoFitEnd Sub |
O resultado é:
Selecionando linhas específicas em seu objeto de alcance
Você pode selecionar linhas específicas em seu objeto Range. O código abaixo mostra como fazer isso:
12345678 | Sub SelectingSpecificRowsInTheRangeObject ()Dim rng como alcanceDefinir rng = intervalo ("A1: C3")rng.Rows (3) .SelectEnd Sub |
O resultado é:
Selecionando colunas específicas em seu objeto de alcance
Você pode selecionar colunas específicas dentro do seu objeto Range. O código abaixo mostra como fazer isso:
12345678 | Sub SelectingSpecificColumnsInTheRangeObject ()Dim rng como alcanceDefinir rng = intervalo ("A1: C3")rng.Columns (3) .SelectEnd Sub |