Compartir vía

Propiedad Range.Formula (Excel)

  • Artículo

Devuelve o establece un valor Variant que representa la fórmula de intersección implícita del objeto en la notación de estilo A1.

Sintaxis

expresión. Fórmula

expresión Variable que representa un objeto Range.

Comentarios

En Excel habilitado para matrices dinámicas, Range.Formula2 supercede Range.Formula. Range.Formula seguirá siendo compatible para mantener la incompatibilidad inversa. Puede encontrar una discusión sobre matrices dinámicas y Range.Formula2 en el tema de documentación de VBA de Excel Fórmula frente a Fórmula2.

Vea también

Propiedad Range.Formula2

Esta propiedad no está disponible para orígenes de datos OLAP.

Si la celda contiene una constante, esta propiedad devolverá dicha constante. Si está vacía, devolverá una cadena vacía. Si la celda contiene una fórmula, la propiedad Formula devuelve la fórmula como una cadena en el mismo formato que se mostraría en la barra de fórmulas (incluido el signo igual ( = )).

Si se establece el valor o la fórmula de una celda como una fecha, Microsoft Excel comprueba que la celda ya tenga uno de los formatos numéricos de fecha u hora. Si no es así, Excel cambia el formato de número al formato de número de fecha corto predeterminado.

Si el rango tiene una o dos dimensiones, se puede definir la fórmula conforme a una matriz de Visual Basic de las mismas dimensiones. Asimismo, es posible escribir la fórmula en una matriz de Visual Basic.

Las fórmulas establecidas mediante Range.Formula pueden desencadenar una intersección implícita.

Si se define la fórmula para un rango de varias celdas, se rellenan todas las celdas del rango con la fórmula.

Ejemplo

El siguiente código de ejemplo configura la fórmula para la celda A1 en Sheet1.

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

El siguiente código de ejemplo configura la fórmula para la celda A1 en Hoja1 para que muestre la fecha actual.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.