Hallo hab mal wieder ein kleines Problem, habe einen Button (Beenden) wenn man den klickt soll das blatt als neue Datei in einen bestimten Ordner gespeichert werden. der Filename setzt sich aus dem Aktuellen Datum und dem Handzeichen zusammen das man in eine Textbox schreibt das klappt alles soweit nur wenn man die Frage  willst du Speichern mit ja beantwortet das file aber schon vorhanden ist mann dann Abricht oder nicht Speichern klickt gibts einen fehler von wegen zugriff verweigert  am besten  er würde in dem fall fragen ob er das  file übereschreiben soll und bei Nein dann halt nichts tun.

So sieht das imoment aus:

Private Sub cmdBeenden_Click()

Speichern = MsgBox("Soll Die Datei gesichert werden ?", vbYesNo)
If Speichern = vbYes Then
Dim var1 As String
Dim var2 As String
var2 = Hztb.Text
    var1 = Date
Pfad = "C:\excel\"
    ThisWorkbook.SaveAs Pfad & var1 & "-" & var2 & ".xlsm"

Else

End If

Unload Me
End Sub

Danke KampfyX