Problem nach 'application.dialogs(xldialogsendmail
27.08.2007 14:19:00
Superpiehl
Ich habe eine Problem mit o.g. Dialog
Ich habe in einem Formular eine Userform, die abfragt, ob gespeichert oder gespeichert und gleich versendet werden soll. Folgender Code für das Anklicken des Speichern und Senden Buttons:
Private Sub cmdSpeichernSenden_Click()
ActiveWorkbook.Save
Unload usrSendenSpeichern
Call mailversand
End Sub
mailversand sieht so aus:
Sub mailversand()
Dim Tag As String
Tag = "Tippabgabe " + Format(Now, "ddmmyy")
Application.Dialogs(xlDialogSendMail).Show "test@test.de", Tag
End Sub
Das funktioniert auch alles. Nur bekomme ich, nachdem das Mailfenster geschlossen ist (egal ob man die Mail versendet oder abbricht), die Meldung "Fehler beim Zugriff auf Pfad/Datei" bezüglich der Userform....
Kann mir da jemand helfen?