Uso de EndDown en una fórmula:

Hola lbenaventea,

Hacer - se puede hacer pero me parece poco logico. Ademas, aunque la llamada
de rango por funcion [A1] es mas corta tambien es cierto que es bastante mas
lenta, por lo cual te recomendaria el uso de la anotacion normal como
Range("A1").

Range("C1").Formula="='[calculo.xls]hoja1'!" & _
Range("G1").End(xlDown).End(xlDown).End(xlDown).Address

Aunque si lo que buscas es la ultima celda con valor en la columna [G] seria
mas correcto, mas corto y mas rapido hacer lo siguiente:

Range("C1").Formula="='[calculo.xls]hoja1'!" & _
Range("G65536").End(xlUp).Address

Y por si algun dia el numero maximo de filas cambia de 65536 a mas podrias
hacer esto:

Range("C1").Formula="='[calculo.xls]hoja1'!" & _
Cells(Rows.Count,"G").End(xlUp).Address

Saludos,
KL


"lbenaventea" wrote in message
news:

actual Para colocar en la celda C1 de mi hoja el valor que tengo en la
celda
G30 de otro workbook (calculo.xls, hoja1), puedo hacer lo siguiente:

[C1].Formula="='[calculo.xls]hoja1'!" & [C1].Offset(30, 7).Address

Pero, si para llegar a esa celda debo situarme en G1 y hacer tres EndDown,
?como lo anoto?

Seria algo parecido a esto (pero sin error de sintaxis):

[C1].Formula="='[calculo.xls]hoja1'!" &
[C1].Offset(D1.EndDown.EndDown.EndDown).Address

Gracias.