Einblenden von CommandButtons
05.03.2003 08:31:05
Hansi
des Makros 2 CommandButton erst angezeigt, wenn die Voraussetzungen (ausgefüllte Textfelder) vorliegen.
Nach Erfassung des ersten Datensatzes und der Betätigung des Speichern-Buttons wird automatisch ein neues leeres Userform erzeugt. Im Moment bleiben allerdings die Commandbuttons bei einem neuen Datensatz aktiv, obwohl die Eingabefelder noch nicht ausgefüllt sind. Welche Anweisung muss ich meiner Speicheranweisung noch geben, dass die beiden Commandbuttons bei Eingabe eines neuen Datensatzes wieder ausgeblendet werden ?
Meine Prozedur für das Changeereignis der Textboxen lautet:
If TextBox1 <> "" And TextBox2 <> "" And TextBox3 <> "" And TextBox4 <> "" And TextBox5 <> "" And ComboBox1 <> "" Then Speichern.Visible = True
If TextBox1 <> "" Or TextBox2 <> "" Or TextBox3 <> "" Or TextBox4 <> "" Or TextBox5 <> "" Or ComboBox1 <> "" Then Löschen.Visible = True
Anzeige