🎒 GUARDAR HOJA en un LIBRO NUEVO con Macros ⛹🏻‍♂️

[@Angel_Alvarez_Concepcion57]

Excelente trabajo ingeniero gracias por su ayuda y abrazos desde Puerto Rico 🇵🇷

[@WinnerGroup-f2z]

Hola Buen día. Muchas gracias, por su ayuda. Pregunta adicional. En caso que la hoja a copiar tenga vínculos o formulas referidas a otras hojas, como podemos romper esos vínculos?

[@raulayalaexcel]

Revisa la variable que se está utilizando en el código y si está dentro del rango de filas.

[@nelsonalbarracin4485]

Excelente, quiero saber si puedo exportar a un mismo libro y no a libros independientes?

[@rashelguzmansanchez6880]

Gracias, me super encantó, eres lo máximo.

[@cocherialanussseannecchini3113]

.....Excelente ,, Muy Practico

[@raulayalaexcel]

Gracias, saludos

[@j.refugiovazquezvargas3701]

Gracias me super encanto

[@ceciborgato1940]

muchas gracias! Sabes como puedo hacer si ademas quiero crear varias hojas en base a una tabla de datos y guardarlas?

[@oscaroriaslandivar]

Muy buen video. Quisiera saber como puedo hacer si tengo hoja exel con una base de datos y copiar en hojas exel individuales. muchas gracias

[@SaraLilianaNeiraMerchan]

Hola buenos días excelente video como podría adicionar el código a tu macro para que la hoja que estoy exportando a nuevo libro no se vaya con formulas ( los campos están formulados ) Gracias

[@lisethcarolinazambranoavil3565]

Hola ayuda por favor necesito que guarde el libro dolo con valores Gracias 🫂

[@gerson21222]

Excelente aporte, me podrías ayudar con algo? Quisiera que el archivo no se abra al finalizar el guardado, podrías ayudarme a identificar qué comando debo modificar? Sospecho que es el " FileFormat:=xlOpenXMLWorkbook .Close SaveChanges:=False " pero no estoy seguro

[@raulrico6102]

Y para guardar varias hojas en un libro nuevo?

[@zodizuliam]

Sub Guardar_Hoja_en_Libro_Nuevo() Nombre_de_Hoja = [N5].Value Ruta = ThisWorkbook.Path Nombre_del_Archivo = [J6].Value Worksheets(Array(Nombre_de_Hoja)).Copy With ActiveWorkbook .SaveAs Filename:=Ruta & "F:\REPORTE PRODUCCIÓN CORPORATIVO" & Nombre_del_Archivo & ".xlsx", FileFormat:=xlOpenXMLWorkbook .Close SaveChanges:=False End With End Sub ayuda por favor......que error tiene en saveas me aparece en amarillo.... me copia la hoja no la guarda ni la cierra.