Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Necesito modificar macro por favor!!! ayuda!!!

joseandres

New member
Registrado
27 Oct 2021
Mensajes
6
Buenas tardes, necesitaria por favor modificar esta macro, que por cierto funciona muy bien, pero necesito realizar cambios.
Une varias hojas de varios libros, el resultado es un archivo nuevo con...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
El problema lo tienes ahi, esas tomando cada "Hoja" de los libros
Código:
For Each Hoja In ActiveWorkbook.Sheets
Hoja.Copy after:=Workbooks(A).Sheets(Workbooks(A).Sheets.Count)
Next
...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Según entiendo, sustituye:
Código:
For Each Hoja In ActiveWorkbook.Sheets
Hoja.Copy after:=Workbooks(A).Sheets(Workbooks(A).Sheets.Count)
Next

por:
Código:
Sheets(1).Copy...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Volver
Arriba