Textfelder prüfen
Verfasst: Do, 15.02.2007 10:28
Hallo zusammen,
in einem Dialog habe ich diverse Textfelder bzw. NumericFields.
In Textfeld2 ("tB2") darf nur etwas eingetragen werden, wenn in Textfeld1 ("tB1) ein bestimmtes Jahr nicht unterschritten wird.
Ich möchte nun dem "Bei Fokuserhalt"-Ereignis des Textfeld2 ein Makro zuweisen, dass dies prüft. So in etwa stelle ich mir den Code vor:
Nun folgendes Problem:
Ich habe viele dieser Felder, in denen diese Abhängigkeit besteht. Kann ich das Makro so variabel gestalten, dass ich allen Feldern ein und dasselbe Makro zuweisen kann. Dafür müsste ich den Namen des aktiven Feldes auslesen können. Geht das ?
Gruss
Thomas
in einem Dialog habe ich diverse Textfelder bzw. NumericFields.
In Textfeld2 ("tB2") darf nur etwas eingetragen werden, wenn in Textfeld1 ("tB1) ein bestimmtes Jahr nicht unterschritten wird.
Ich möchte nun dem "Bei Fokuserhalt"-Ereignis des Textfeld2 ein Makro zuweisen, dass dies prüft. So in etwa stelle ich mir den Code vor:
Code: Alles auswählen
Sub tB2_Enter
If year(Date) - oDialog.getControl("tB1").Value > 7 Then
MsgBox "darfste nicht"
oDialog.getControl("tB3").SetFocus
End If
End SubIch habe viele dieser Felder, in denen diese Abhängigkeit besteht. Kann ich das Makro so variabel gestalten, dass ich allen Feldern ein und dasselbe Makro zuweisen kann. Dafür müsste ich den Namen des aktiven Feldes auslesen können. Geht das ?
Gruss
Thomas