Hej jeg har et problem. Jeg har en formular med en under formular og jeg har lavet denne her
Private Sub Kombinationsboks76_Enter()

If IsNull([Kombinationsboks67]) Then

Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Du har ikke indtastet en bankkonto eller kassekonto. Vil du det tryk Ja. Hvis du ikke vil forsætte tryk Nej ?"    ' Define message.

Style = vbYesNo + vbCritical + vbDefaultButton2     ' Define buttons.
Title = "MsgBox Bankkonto "    ' Define title.
Help = "DEMO.HLP"    ' Define Help file.
Ctxt = 1000    ' Define topic
        ' context.
        ' Display message.
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then    ' User chose Yes.
    MyString = "Yes"
      Me![Kombinationsboks67].SetFocus
Else    ' User chose No.
    MyString = "No"
    Me![Formularer]![Indkøb]![Felt44].SetFocus

End If
End If

Og det går fint med at flytte SetFocus så længe der er i samme formular men jeg kan ikke flytte SetFocus til den anden formular.Det er den sidste liene der er noger galt i. Håber at I Kan hjælpe.

Er det sådan du mener
Me!Forms!Indkøb!Felt44!felt.SetFocus

for der kommer en fejl kan ikke finde Forms

Ja jeg tænkte nok at der ikke skulle stå Me foran
Indkøb er navnet på formularen og Felt44 er feltet som der skal sættes focus på

Der kommer forsat en fejl der siger at den ikke kan finde formularen indkøb    

Hej hkh
Først tak for din hjælp men jeg ikke få det til at virke. Jeg syndes også at der må mangle noget når Me henviser til den aktuelle formular skal der så ikke stå noget med GOTO eller noget som det?.
Jeg forstår det lidt bedre nu Min hoved formular heder Klade og underformularen heder Indkøb og feltet Felt44.
   

Access 2016