1
Excel / Re: Doorvoeren werkt niet
« Laatste bericht door Haije Gepost op Vandaag om 14:01:59 »kijk eens of je hier verder mee komt
Code: [Selecteer]Dim BackUpPath As String
BackUpPath = "Your path"
Sub BackUp()
Dim BackUpPath As String
BackUpPath = "Your path"
Dim BackUpFile As String
BackUpFile = BackUpPath & "BackUp.xlsm"
ThisWorkbook.SaveCopyAs Filename:=BackUpFile
End Sub
Save.....
énSaveAs.....