Propriedade Range.Range (Excel)
Retorna um objeto Range que representa uma célula ou um intervalo de células.
Sintaxe
expressão. Intervalo (Cell1, Cell2)
expressão Uma variável que representa um objeto de Intervalo.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Cell1 | Obrigatório | Variant | O nome do intervalo. Deve ser uma referência ao estilo A1 na linguagem da macro. Pode incluir o operador de intervalo (dois pontos), o operador de interseção (um espaço) ou o operador de união (uma vírgula). Além disso, pode incluir sinais de dólar, mas eles são ignorados. Use um nome definido local em qualquer parte do intervalo. Se você usar um nome, será considerado que o nome estará na linguagem da macro. |
| Cell2 | Opcional | Variant | A célula no canto superior esquerdo ou no canto inferior direito do intervalo. Pode ser um objeto Range que contém uma única célula, uma coluna inteira ou uma linha inteira, ou pode ser uma cadeia de caracteres que nomeia uma única célula na linguagem da macro. |
Comentários
Quando usada sem um qualificador de objeto, essa propriedade é um atalho para ActiveSheet.Range (ela retorna um intervalo da planilha ativa; se a planilha ativa não for uma planilha, a propriedade falhará).
Quando aplicada a um objeto Range, a propriedade é relativa ao objeto Range. Por exemplo, se a seleção é a célula C3, Selection.Range("B1") retorna a célula D3, porque é relativa ao objeto Range retornado pela propriedade Selection. Por outro lado, o código ActiveSheet.Range("B1") sempre retorna a célula B1.
Exemplo
Este exemplo define o valor da célula superior esquerda do intervalo B2:C4 na Planilha1 da pasta de trabalho ativa, ou seja, a da célula B2, para 3,14159.
With Worksheets("Sheet1").Range("B2:C4")
.Range("A1").Value = 3.14159
End With
Este exemplo faz loops nas quatro células no canto superior esquerdo do intervalo B2:Z22 na Planilha1 da pasta de trabalho ativa. Se uma das células tiver um valor menor do que 0,001, o código substituirá esse valor por 0 (zero).
Public Sub TruncateSmallValues()
Dim exampleRange As Excel.Range
Set exampleRange = Worksheets("Sheet1").Range("B2:Z22")
Dim cell As Excel.Range
For Each cell in exampleRange.Range("A1:B2")
If cell.Value < .001 Then
cell.Value = 0
End If
Next cell
End Sub
Este exemplo define o estilo de fonte nas células B2:D6 na Planilha1 da pasta de trabalho ativa como itálico. O exemplo usa a Sintaxe 2 da propriedade Range.
With Worksheets("Sheet1").Range("B2:Z22")
.Range(.Cells(1, 1), .Cells(5, 3)).Font.Italic = True
End With
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.