Quiero hacer una consulta para ver si me ayudan con esto que no me deja abrir el archivo cuando lo guardo de esta manera en formato .Xlsm
Guarda el archivo y todo bien, solo que al intentar abrir el archivo nuevo me da error.
Sub CopiarLibroActivo()
With ActiveWorkbook
.SaveCopyAs "C:\Users\Arroyo\Desktop\Domesa\ " & Format(Now, "dd-mm-yyyy") & " Control Cinta, Sobres y Bolsas" & ".xlsx"
End With 'TRATO DE GUARDARLO COMO ".XLSX" DE ESTA MANERA
'PERO AL INTENTAR ABRIR EL ARCHIVO CREADO ME DA ERROR
End Sub
Hola, soy nuevo aca.
Quiero hacer una consulta para ver si me ayudan con esto que no me deja abrir el archivo cuando lo guardo de esta manera en formato .Xlsm
Guarda el archivo y todo bien, solo que al intentar abrir el archivo nuevo me da error.
Sub CopiarLibroActivo() With ActiveWorkbook .SaveCopyAs "C:\Users\Arroyo\Desktop\Domesa\ " & Format(Now, "dd-mm-yyyy") & " Control Cinta, Sobres y Bolsas" & ".xlsx" End With 'TRATO DE GUARDARLO COMO ".XLSX" DE ESTA MANERA 'PERO AL INTENTAR ABRIR EL ARCHIVO CREADO ME DA ERROR End Sub
GuardarLibroActivo.bas