Witam.

Mam Sub po którego kliknięciu otwiera się nowy formularz/podformularz w celu edycji produktu. W jaki sposób mam ustawić fokus na konkretnym polu w nowo otwartym formularzu? W tej chwili cały czas otrzymuje focus na pole Holz, nawet bez wpisów z SetFocus.

Mój kod wklejam poniżej:

 
Private Sub Holz_Click()
On Error GoTo Err_Holz_Click
openform
Holz.SetFocus
Err_Holz_Click:
Exit Sub
End Sub

Private Sub Menge_Click()
On Error GoTo Err_Menge_Click
openform
Menge.SetFocus
Err_Menge_Click:
Exit Sub
End Sub

Private Sub openform()
holz_temp = Me.Holz
menge_temp = Me.Menge
stDocName = "DatenanstdGr"
stLinkCriteria = "ID =" & Me![ID]
DoCmd.openform stDocName, , , stLinkCriteria

End Sub