Per Button prüfen, ob Felder befüllt
12.01.2022 12:23:36
To
Ich hätte mal wieder eine Frage. Und zwar suche ich nach einer praktikablen Möglichkeit, per Button zu überprüfen, ob gewisse Felder befüllt sind und wenn nein, es zu einem Abbruch kommt.
Näheres: Ich habe ein Formular, das mit Klick auf einen Button automatisch abgespeichert und als PDF ausgegeben wird. Per Klick auf den selben Button soll allerdings erst überprüft werden, ob Pflichtfelder befüllt sind und wenn nein, soll der ganze nachfolgende Vorgang (Speicherung und Ausgabe als PDF) abgebrochen werden und eine Meldung angezeigt werden.
Ich habe das so probiert; die Abfrage der Pflichtfelder funktioniert, allerdings speichert er dann ungewollt trotzdem. Was mache ich falsch? Stehe ich so sehr auf dem Schlauch?
Private Sub CommandButton1_Click()
If Worksheets("Tabelle1").Range("C19") = "" Then Cancel = True And MsgBox("Bitte alle Pflichtfelder befüllen!")
Const myPath = "N:\***\***\***\***\***\***"
Sheets("Tabelle1").Range("A1:H55").ExportAsFixedFormat x1TypePDF, myPath & Range("C18").Value & ".pdf", _
OpenAfterPublish:=True
End Sub
VG
Tom