Propriedade Range.Formula2 (Excel)

Devolve ou define um valor variante que representa a fórmula do objeto na notação de matriz de estilo A1.

Sintaxe

expressão. Fórmula2

expressão Uma variável que representa um objeto de Intervalo.

Comentários

Esta propriedade não está disponível para fontes de dados OLAP.

Em Matrizes Dinâmicas ativadas no Excel, Range.Formula2 substitui Range.Formula. Range.Formula continuará a ser suportado para manter a retrocompatibilidade. Para obter mais informações sobre Matrizes Dinâmicas e Intervalo.Fórmula2, veja Fórmula vs. Fórmula2.

Se a célula contiver uma constante, essa propriedade retornará essa constante. Se a célula estiver vazia, essa propriedade retornará uma cadeia de caracteres vazia. Se a célula contiver uma fórmula, a propriedade Fórmula devolve a fórmula como uma cadeia no mesmo formato que seria apresentado na barra de fórmulas (incluindo o sinal de igual ( = )).

Se você definir o valor ou a fórmula de uma célula como uma data, O Microsoft Excel verificará se a célula já está formatada com um dos formatos de número de data e hora. Caso contrário, o Excel altera o formato de número para o formato de número de data abreviado predefinido.

Quando o intervalo é uni ou bidimensional, você pode definir a fórmula como uma matriz do Visual Basic com as mesmas dimensões. Também pode inserir a fórmula em uma matriz do Visual Basic.

As fórmulas definidas com Range.Formula2 serão sempre avaliadas como uma matriz e poderão ser transpostas se for devolvido mais de 1 resultado.

A configuração da fórmula para um intervalo de várias células preenche todas as células do intervalo com a fórmula.

Exemplo

O código a seguir define a fórmula para a célula A1 na Planilha1.

Worksheets("Sheet1").Range("A1").Formula = "=$A$4+$A$10"

O exemplo de código a seguir define a fórmula para a célula A1 na Planilha1 para exibir a data de hoje.

Sub InsertTodaysDate() 
    ' This macro will put today's date in cell A1 on Sheet1 
    Sheets("Sheet1").Select 
    Range("A1").Select 
    Selection.Formula2 = "=text(now(),""mmm dd yyyy"")" 
    Selection.Columns.AutoFit 
End Sub

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.