abrir los archivos de una lista

20/09/2007 - 22:42 por Rudolph | Informe spam
buenas tardes!

tengo una libro con la lista de archivos de excel que estan en un directorio
determinado.

puedo hacer una macro que lea la lista y abra los archivos una a uno?
Rodolfo Rangel
Corpivensa
S.G.
 

Leer las respuestas

#1 Héctor Miguel
21/09/2007 - 01:43 | Informe spam
hola, Rodolfo !

tengo una libro con la lista de archivos de excel que estan en un directorio determinado.
puedo hacer una macro que lea la lista y abra los archivos una a uno?



puedes hacer un ciclo For...Next y que en cada avance del contador [fila o variable] se abra un archivo [p.e.]

Dim Ruta As String, Celda As Range
Ruta = "c:uta y sub\carpetas a\los archivos\"
For Each Celda In Range("a2:a5")
Workbooks.Open Ruta & Celda & ".xls"
' aqui realizas tus acciones y cierras cada libro ... '
Next

o si prefieres un avance por lineas...

Dim Ruta As String, Fila As Integer
Ruta = "c:uta y sub\carpetas a\los archivos\"
For Fila = 2 To 5
Workbooks.Open Ruta & Range("b" & Fila) & ".xls"
' aqui realizas tus acciones y cierras cada libro ... '
Next

saludos,
hector.

p.d. la otra macro que expusiste en tu consulta anterior [la *kilometrica*]...
estoy viendo la forma de *adelgazarla*, pero me serviria que indiques en donde estara el listado de archivos
el nombre de la hoja y si los nombres en dicho listado contendran la EXTension .xls -?-

Preguntas similares