Sub Grafisch_darstellen()
If ComboBox1 = "" Then
MsgBox("Bitte Auswahl treffen")
goto Ende
end if
restlicher Code
Ende:
End sub
Jetzt muß ich mir noch überlegen wie ich das in meinem Code einbaue.
Übrigends mittlerweile habe ich es geschafft, die Fehlermeldung wegzubekommen deine Lösung gefällt mir aber besser als meine.
MsgBox ("Bitte Auswahl Eingeben!")
Die Box ist jetzt hier, nur wenn man auf ok klickt kommt wieder die Fehlermeldung, da der Code dann weiterläuft.
Gruß Kurt
Sub Grafisch_darstellen()
If ComboBox1 = "" Then
MsgBox "Bitte Auswahl treffen"
goto Ende
end if
restlicher Code
Ende:
End sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen