Excel sjablon altijd leeg hebben

[moes1959]

Ik heb een Excel sjabloon. Ik wil hem na gebruik leeg hebben. Is er een mogelijkheid dat je hem allen als schrijfbestand kan gebruiken en de wijzigingen allen opslaan via "opslaan als" dus dat ie na gebruik altijd leeg is.

 

[spaarie]

De gebruiker zal dan wel macro's ingeschakeld hebben anders werkt het niet.
Plaats deze in ThisWorkbook:

Private Sub Workbook_BeforeSave(ByVal opslaanals As Boolean, cancel As Boolean)
    If opslaanals = False Then
        cancel = True
        MsgBox "U kunt alleen 'opslaan als' gebruiken!", vbCritical, "Attentie"
    End If
End Sub