ich möchte Prüfen ob in einem Formular diverse Standarts Angewählt wurden wenn dieses der fall _ ist soll das ganze per mail versendet werden wenn dies nicht der fall ist soll er eine fehlermeldung rausgeben mit ja oder nein und bei ja dieses ding dann per mail versenden bei nein eine messagebox
Private Sub pruefung_Click()
'Schließen-Button
If m35 And m36 Then
m35 = False: m36 = False
Unload Me ' oder Me.Hide
Else
MsgBox("Es wurden nicht alle Krones Standarts ausgewählt, Abschicken?", vbYesNo) = vbYes
ActiveWorkbook.SendMail "Adresse@Provider.com", "Thema der Mail"
MsgBox "Verschickt"
Else
MsgBox "Bitte Setzen sie Hacken bei Statische Absicherung und Abdeckung für Ein und _
Auslaufdrehkörbe"
End If
End Sub
so hab ich es versicht bekomme aber immer wieder fehler