Macro para copiar fórmula en columna variable
Necesitaría una pequeña marco para copiar una fórmula en una columna variable:
En una de las hojas llamada "local filters" en la celda H1 tengo la siguiente fórmula:
=BuscarV($H13;' mpp-saphir'!$D$1:$N$500;2;0)
Lo que quiero es que la macro me copie esta fórmula en la hoja "Report" desde la celda G13 hasta la última hacia abajo teniendo como referencia la última celda de la columna B.
1 respuesta
Respuesta de Dante Amor
1
H o l a:
Te anexo la macro
Sub CopiarCelda()
'Por.Dante Amor
Set h1 = Sheets("local filters")
Set h2 = Sheets("report")
u2 = h2.Range("B" & Rows.Count).End(xlUp).Row
If u2 < 13 Then u2 = 13
h1.Range("H1").Copy h2.Range("G13:G" & u2)
MsgBox "Celdas copiadas"
End Sub':) ':)
