Advertisement
Guest User

Untitled

a guest
Sep 5th, 2018
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Sub Auto_open()
  2.  
  3. ActiveWorkbook.SaveCopyAs ("C:\Users\Gustaf\Desktop\excelbackup\Backuper\Backup Förbättringskatalog Privat " & Format(Now(), "YYMMDD, hh-mm-ss") & ".xlsm")
  4.  
  5. End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement