Se puede hacer lo siguiente?

hola, Ana !

... libro con una consulta que actualiza... datos de internet... en 2 columnas B y C
... en B tengo la fecha y en C un link para descargar un archivo Zip
... rutina para actualizar... cuando se abre el libro... recorra las fechas y... bajar los archivos Zip
... problema... cada vez que trata de bajar un zip me pregunta si lo quiero guardar y donde
... no se puede hacer automaticamente que es mi idea, se tiene que... hacer click para guardar el archivo.
... que no me pregunte... y que lo guarde en una determinada carpeta
... los necesito guardar no me sirve abrir el zip... codigo que tengo hasta hora ... son:
While coldate <> lastdate 'loop que recorre las fechas comparando con mi ultima actualizacion
Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True ''para bajar el zip
Application.Wait (Now + TimeValue("1:45:00")) 'Para esperar que baje el zip
Selection.Offset(1, 0).Select
coldate = Selection.Offset(0, -1).Value
Wend

1) [creo que] sera mas amigable llamar a algunas API's y/o usar el comando interno ftp.exe que hacer un 'follow' a un hyperlink
2) algunas cosillas que no me quedan muy claras son...
a) es necesario poner al codigo en 'stand-by' durante ->una hora y 45 minutos<- mientras se termina la descarga ?
b) en donde se debiera guardar el archivo .ZIP ->y con que nombre<- ?
c) se trata de un solo archvo por ejecucion del codigo ? [o pudiera tratarse de varios archivos Y NOMBRES] -?-
d) si se trata de varios... te recomiendo cambiar de while...wend a... do while...loop [a reserva de 'ver' las condiciones] :)
e) cuando mencionas que al abrir el libro se actualizan las columnas B y C... que significa ->exactamente<- ???
-> supongo que insertas/agregas hyperlinks ->por codigo<- en dichas actualizaciones ???
-> podrias poner un ejemplo de dichas direcciones ?
[no se si haya algo mas que se este quedando en el tintero] :))

saludos,
hector.

bueno aca van algunas explicaciones:

a) me equivoque en realidad espero 1 minuto 45 segundos para bajar el archivo
b)el archivo lo quiro guardar en c:/Indice y con el nombre que tiene
"closing_archive_09.09.2005.zip" el nombre cambia de acuerdo a la fecha
c) el libro actualiza una consulta que toma datos de internet de la
siguiente pagina: http://www.stoxx.com/data/closing_d...chive.html
en B tengo las fechas y en C un link para bajar el zip.
EL archivo lo actualizamos una vez por semana entonces tenemos 5 fechas a
actualizar normalmente , para cada fecha se baja el archivo zip se guarda en
c:/Indice , lugo se "unzip" en C:/Temp y se abre solamenete un archivo
Weights.xls de ese archivo se obtiene una columna que se pega en una hoja y
guardo los zip en otra carpeta como backup

O sea que para cada fecha solamente necesito una columna del archivo
Weights.xls que viene en el zip

Como esto es solamnete una parte de todos los datos que necesitos de
diferentes archivos que se obtienen de diferente manera me gustaria
automatizar todo para que no se tenga que hacer manualmente y obtener el
archivo final en menos tiempo. Para este caso el problema es que se tiene
que esperar que el programa pregunte si se quiere guardar y en donde y por lo
tanto uno tien que estar pendiente de eso , me gustaria hacerlo
automaticamente , sin tener que controlar que pregunte si se guarda y donde.

Espero que haya quedado mas claro
muchas gracias
Ana

"Héctor Miguel" a écrit :

hola, Ana !

> ... libro con una consulta que actualiza... datos de internet... en 2 columnas B y C
> ... en B tengo la fecha y en C un link para descargar un archivo Zip
> ... rutina para actualizar... cuando se abre el libro... recorra las fechas y... bajar los archivos Zip
> ... problema... cada vez que trata de bajar un zip me pregunta si lo quiero guardar y donde
> ... no se puede hacer automaticamente que es mi idea, se tiene que... hacer click para guardar el archivo.
> ... que no me pregunte... y que lo guarde en una determinada carpeta
> ... los necesito guardar no me sirve abrir el zip... codigo que tengo hasta hora ... son:
> While coldate <> lastdate 'loop que recorre las fechas comparando con mi ultima actualizacion
> Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True ''para bajar el zip
> Application.Wait (Now + TimeValue("1:45:00")) 'Para esperar que baje el zip
> Selection.Offset(1, 0).Select
> coldate = Selection.Offset(0, -1).Value
> Wend

1) [creo que] sera mas amigable llamar a algunas API's y/o usar el comando interno ftp.exe que hacer un 'follow' a un hyperlink
2) algunas cosillas que no me quedan muy claras son...
a) es necesario poner al codigo en 'stand-by' durante ->una hora y 45 minutos<- mientras se termina la descarga ?
b) en donde se debiera guardar el archivo .ZIP ->y con que nombre<- ?
c) se trata de un solo archvo por ejecucion del codigo ? [o pudiera tratarse de varios archivos Y NOMBRES] -?-
d) si se trata de varios... te recomiendo cambiar de while...wend a... do while...loop [a reserva de 'ver' las condiciones] :)
e) cuando mencionas que al abrir el libro se actualizan las columnas B y C... que significa ->exactamente<- ???
-> supongo que insertas/agregas hyperlinks ->por codigo<- en dichas actualizaciones ???
-> podrias poner un ejemplo de dichas direcciones ?
[no se si haya algo mas que se este quedando en el tintero] :))

saludos,
hector.