Misschien een eenvoudig iets, maar de naam van het op te slane bestand mag alles zijn behalve “machinelijst_draaitijd” .. doet of probeerd men het toch men (door selectie) dan zou die macro iets moeten tone zoals “ bestandsnaam ‘machinelijst_draaien’ niet toegestaan”
Code:
Sub opslaan()
'
' opslaan Macro
' De macro is opgenomen op 29/04/2018 door Fernand.
Dim bFileSaveAs As Boolean
bFileSaveAs = Application.Dialogs(xlDialogSaveAs).Show
If Not bFileSaveAs Then MsgBox "Niet opgeslagen", vbCritical
End Sub