Extreme Veteran
Beiträge: 573
| Hallo,
MarkusC - 16.06.20 10:36
Select Case i
Case 1: DoCmd.OpenForm "02-Eingabeformular"
'Forms![02-Eingabeformular]![Untergeordnet220].SetFocus
Forms!Untergeordnet220.SourceObject = "021-UFo Eingabefunktion Typen"
Probier mal so:
Forms![02-Eingabeformular]!Untergeordnet220.SourceObject = "021-UFo Eingabefunktion Typen"
----- Gruss - Peter |