Macro que guarde la hoja activa y por páginas
Por consulta, ¿se puede generar una código VBA para que de un libro excel solo me guarde la hoja activa?
Por ejemplo en la imagen la hoja PLANTILLA VB solo quiero que al ejecutar la macro, solo guarde la pagina 1, donde esta la tabla dinámica, NO TOME EN CUENTA LOS SEGMENTADORES.
Me mantengo atento a sus gentiles comentarios.
Respuesta de Abraham Valencia
1
Hola Abraham.
Solo quiero guardar de la hoja los datos de la tabla dinámica, que no tome en cuenta los segmentadores.
Los rangos que están de la columnas A : F
Quedo atento.
Intenta así:
Sub GuardarHojaActiva()
Dim NombreArchivo$
Application.ScreenUpdating = False
Application.DisplayAlerts = False
NombreArchivo = ActiveWorkbook.Path & "\" & "nombredearchivo.xlsx"
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:=NombreArchivo, FileFormat:=xlOpenXMLWorkbook
ActiveWorkbook.ActiveSheet.Columns("G:N").Delete Shift:=xlToLeft
ActiveWorkbook.Close True
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End SubObviamente adáptalo a tus necesidades.
Abraham Valencia
