VBA - SetFocus
08.12.2004 23:20:07
Thorsten
ich möchte nach einem Textfeld in der Funktion (AfterUpdate)
einen bestimmten Button einblenden, jedoch diesen nicht aktivieren, sondern einen anderen Button.
folgender befehl funktioniert nicht.
ok_button.SetFocus
mein code sieht wie folgt aus:
Private Sub Partie_AfterUpdate()
If Menge = "" Or Menge = 0 Or Palette = "" Or Datum = "" Or Partie = "" Then
MsgBox "Sie müssen alle Felder ausfüllen", 0 + 16, "Eingabe failing ..."
Else
LGLP_button.Visible = True
ok_button.Enabled = True
ok_button.SetFocus
End If
End Sub
jedoch wird laut diesem code der button ok_button nicht in den Fokus gesetzt.
ich hoffe Ihr habt eine lösung
gruss
Thorsten
Anzeige