Pasar fórmula a Valores

[RandalHP]

Estimados,

Esperando que se encuentren bien, recurro a ustedes para que me ayuden a dar solución a una duda que tengo.

He creado una VBA para generar una fórmula en Excel tomando como criterio el contenido de otra. Si tiene "X" cantidad de filas esta se rellene en otra celda con la fórmula propuesta. Ahora, ¿Cómo puedo hacer para que después de aplicada la formula esta pase a valores?

Adjunto el VBA que use:

    Range("Z2").Formula = "=VLOOKUP(Y2,AO:AP,2,0)"
    Range("Z2", "Z" & Range("AC2").End(xlDown).Row) = Range("Z2").Formula

Quedo atento a sus comentarios.

Ss.

[Antoni]

    With Range("Z2", "Z" & Range("AC2").End(xlDown).Row)
      .Formula = "=VLOOKUP(Y2,AO:AP,2,0)"
      .Value = .Value
    End With

 

[RandalHP]

Hace 9 horas, Antoni dijo:

    With Range("Z2", "Z" & Range("AC2").End(xlDown).Row)
      .Formula = "=VLOOKUP(Y2,AO:AP,2,0)"
      .Value = .Value
    End With

 

Muchas gracias, me funciono muy bien!!!

Ss.