Gehe zu letztem Datensatz in Unterformular
Private Sub GeheZuDatensatz_Click()
Forms![HF]![UF01d].SetFocus
DoCmd.GoToRecord , , acLast
MsgBox Me!UF01d.Form!DingID.Value
Screen.PreviousControl.SetFocus
End Sub
Private Sub GeheZuDatensatz_Click()
Forms![HF]![UF01d].SetFocus
DoCmd.GoToRecord , , acLast
MsgBox Me!UF01d.Form!DingID.Value
Screen.PreviousControl.SetFocus
End Sub
Es war informativ und spannend. Jede(r) der Gruppe kann dem Kurs etwas entnehmen, was er/sie braucht. Office Dienste