none
Abrir varios archivos de excel y validar información RRS feed

  • Pregunta

  • Hola a todos

    Tengo varias consultas a ver si me pueden ayudar. Necesito ejecutar por medio de una macro me pueda contar la cantidad de archivos con extensión .xls en la siguiente carpeta "C:\Archivos\" y a la vez pueda ir abriendo cada archivo y validar la información que alli se encuentre.

    Es decir si en la carpeta hay 10 archivos en excel, la macro pueda recorrer cada archivo e ir abriendolo uno por uno y por consiguiente leyendo la información que encuentre en cada archivo, una vez que termine de revisar la información que encuentre cierre el archivo y siga con el siguiente hasta llegar al archivo número 10.

    Espero poder explicarme. Agradeceré toda la ayuda posible.

    Saludos  

    jueves, 25 de marzo de 2010 3:13

Todas las respuestas

  • Podes ir con filesystemobject recorriendo

    dim fs as scripting.filesystemobject

    dim ex as excel.application

    dim a as scripting.file

    for each a in fs.getfolder(path).files

    if right(a.name,3) = "xls" then

      ex.workbooks.open(a.path)

    y ahi trabajar con el excel

    luego lo cerras y seguis dando vueltas

    next

    jueves, 22 de abril de 2010 18:43