Capturar datos desde otro libro Excel sin ejecutar macros
publicado
Buenos días. Necesito a ver si podéis ayudarme con una duda.
Tengo un Excel que recupera datos de una multitud de archivos Excel. Lo que hace es que busca según un listado en una hoja y abre los Excel que encuentra que su nombre comience por los dígitos del listado. pero estos Excel que abre tienen macros, eso ralentiza su apertura y cuando abre por ejemplo 10 libros se queda bloqueado todo el Excel.
No se si algún método para abrir un Excel desde otro pero que no ejecute las macros del libro que va a consultar para que así no haya demora y no ralentice este proceso. Por ejemplo abrirlos en modo lectura o algo así.
Yo uso estas líneas con el método Open..., que lo que hace es abrir los libros de manera normal.
For Each C In Range("b8", Cells(Rows.Count, "b").End(xlUp))
iFile1 = Dir(RutaB & "\" & C & " Cuex " & mAño & " " & MonthName(mMes) & " *.xl*")
If iFile1 <> "" Then Workbooks.Open RutaB & "\" & iFile1
Next
Gracias de antemano.
Moisés.
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Buenos días. Necesito a ver si podéis ayudarme con una duda.
Tengo un Excel que recupera datos de una multitud de archivos Excel. Lo que hace es que busca según un listado en una hoja y abre los Excel que encuentra que su nombre comience por los dígitos del listado. pero estos Excel que abre tienen macros, eso ralentiza su apertura y cuando abre por ejemplo 10 libros se queda bloqueado todo el Excel.
No se si algún método para abrir un Excel desde otro pero que no ejecute las macros del libro que va a consultar para que así no haya demora y no ralentice este proceso. Por ejemplo abrirlos en modo lectura o algo así.
Yo uso estas líneas con el método Open..., que lo que hace es abrir los libros de manera normal.
For Each C In Range("b8", Cells(Rows.Count, "b").End(xlUp)) iFile1 = Dir(RutaB & "\" & C & " Cuex " & mAño & " " & MonthName(mMes) & " *.xl*") If iFile1 <> "" Then Workbooks.Open RutaB & "\" & iFile1 Next
Gracias de antemano.
Moisés.