Moin zusammen,
an den kleinsten Aufgaben verzweifele ich....:-(
Ich habe ein Formular, in dem ich eine Schaltfläche deaktivieren möchte, wenn der Wert in einem Textfeld >0 ist.
Im Anhang findet Ihr einmal das Formular und den code.
Was mache ich falsch ?
Viele Grüße
Andreas
[Anhang gelöscht durch Administrator]
Hallo,
die wichtigste Zeile hast Du unterschlagen. Welches Ereignis ?
....sorry.....beim Öffnen des Formulars
Hallo,
Sub Form_Current()
' Dein Code
End Sub
Moin,
leider bleibt die Schaltfläche weiter aktiviert, egal welcher Wert sich im Textfeld befindet.... >:( ??? ???
Hallo,
lasse Dir mal in einer MsgBox den Inhalt von AnzoT ausgeben.
Übrigens, der Einzeiler macht das Gleiche:
A_starten.Enabled = AnzoT = 0
If Then .... End If entfällt dann ersatzlos.
PS:
Man zeigt Code immer als Text (Kopieren und nicht abschreiben) und nie als Bild.
Du machst es den Helfern leichter, weil man bestehenden Code kopieren und ggf. ändern kann. Mit einem Bild geht das nicht.
Moin zusammen,
die Msgbox gibt nichts aus, obwohl ich doch im Textfed "AnzoT" einen Wert sehe.
Das wird sicher der Grund für die nicht funktionierende Aktivierung der Schaltfläche sein.
Verdammte Axt, was ist hier los?
Sub Form_Current()
MsgBox (Me![AnzoT])
A_starten.Enabled = AnzoT = 0
End Sub
Hallo,
prüfe mal den Namen des Feldes mit AnzoT.
PS:
Und verwende die Codetags (#) für Code, sonst benötigt man eine Lupe. ;D
Moin,
ich habe den Fehler gefunden.
Der Wert des Textfeldes kommt aus einem im Hintergrund geöffneten Formular.
Beim Anzeigen meines Formulars ist dieses Feld jedoch noch nicht gefüllt....:-)
Viele Dank für Eure Hilfe
Andreas