No se como copiar una fórmula en varias lineas.

Hola. Tengo un problema, a ver si me podeis ayudar.

Quiero copiar la fórmula de una celda (E2) hasta una linea en concreto
(que
va variado), para esto he creado un avariable (Final), y en una hoja
(llamada config), en una celda (w5), una formula que tiene por valor por
ejemplo E2:E100.

En la macro, he puesto :

Sheets("Hoja1").Select
Range("E2").Select
Final = Worksheets("Config").Range("w5")
Selection.AutoFill Destination:=Range("Final")

Me da un error 1004, error en el método range de objeto '_Global'

Que hago mal?, Podeis ayudarme?.

Gracias.
Àngel

Hola Angel,

Prueba esto:

Final = Worksheets("Config").Range("W5")
With Worksheets("Hoja1")
.Range(Final).Formula = .Range("E2").Formula
End With

Saludos,
KL


"Angel O" wrote in message
news:%23wB%
> Hola. Tengo un problema, a ver si me podeis ayudar.
>
> Quiero copiar la fórmula de una celda (E2) hasta una linea en concreto
> (que
> va variado), para esto he creado un avariable (Final), y en una hoja
> (llamada config), en una celda (w5), una formula que tiene por valor por
> ejemplo E2:E100.
>
> En la macro, he puesto :
>
> Sheets("Hoja1").Select
> Range("E2").Select
> Final = Worksheets("Config").Range("w5")
> Selection.AutoFill Destination:=Range("Final")
>
> Me da un error 1004, error en el método range de objeto '_Global'
>
> Que hago mal?, Podeis ayudarme?.
>
> Gracias.
> Àngel
>
>
>