Skip to main content
1 de 3
lois6b
  • 7.6k
  • 5
  • 33
  • 54

Con la propiedad .formula puedes asignarle la formula al rango de celdas.

Puse average en vez de promedio (en mi ordenador Promedio no lo reconoce)

y el rango de la formula es G:G, no G*:G*

Sub CambiarFormula()

    Dim celda_inicio As String
    Dim celda_fin As String

    Dim nueva_formula As String

    celda_inicio = "A1"
    celda_fin = "A10"
    
    nueva_formula = "=Average(G:G)"

    Range(celda_inicio, celda_fin).formula = nueva_formula

End Sub
lois6b
  • 7.6k
  • 5
  • 33
  • 54