Luis Eduardo Leon

juanito01 respondió: Te creas un modulo cualquiera y le pegas... Function copiar() As Boolean Dim fs As New FileSystemObject fs.CopyFile "c:\bd1.mdb", "c:\bd1-" & Format(Now, "yyyymmdd-hhmmss") & ".mdb", True Set fs = Nothing End Function Luego te creas una macro con una...