Hallo
ich habe folgenden Code um in ein Unterformular Felder zu sperren:
For Each ctl In Me.AuftragPalettenUFO.Controls
If ctl.Tag = "d" Then
ctl.Locked = True
End If
Next ctl
Haupformularname = AuftragFRM
Unterformularname = AuftragPalettenUFO
Felder mit Marke = d (kleingeschrieben) sollen gesperrt werden.
Laut Debugger wird der Befehl clt.locked = true durchlaufen.
Aber nichts wird gesperrt.
Ist hier ein Fehler drinn?
Wenn ja dann bitte helfen.
Wenn nein dann habe ich noch irgendwo eine Routine die entsperrt (habe aber keine gefunden)
Danke
Gruß
Johann
Hallo,
hat sich erledigt.
Die Routine ist in Ordnung nur habe ich einmal vergessen die Marke zu setzten.
Und gerade mit dem Feld habe ich getestet.
Gruß
Johann