Dante Amor respondió:
H o l a: Para ello se requiere de una macro. Pon la siguiente macro en un módulo. Sub GuardarComo() 'Por.Dante amor Application.ScreenUpdating = False Application.DisplayAlerts = False ruta = ThisWorkbook.Path & "\" ThisWorkbook.Save With...