Hallo Wissende,
Ich habe (vereinfacht) eine Tabelle "Wertpapiere" und eine Tabelle "Kurse". Durch die Wertpapiere navigiere ich mittels Formular, und die Kurse (mehrere Daten) gebe ich über ein gebundenes UFO ein. Nun möchte ich, dass bei Navigation auf ein neues Wertpapier nicht nur der Fokus im Kurs-UFO steht, sondern dass auch der neue Datensatz bereits aktiviert ist.
Ich habe bereits im VBA-Code des Hauptformulars
Private Sub Form_Current()
Forms![ofoFormular]!ufoKurse.SetFocus
End Sub
und im Unterformular
Private Sub Form_GotFocus()
DoCmd.GoToRecord , , acNewRec
End Sub
Das mit dem Fukuserhalt funktioniert. Allerdings wird nicht nach dem Fokuserhalt zum neuen Datensatz gesprungen. Was mache ich falsch?
Vielen Dank im voraus und ein frohes Fest!
Hans-Jürgen
Hallo Hans-Jürgen,
so sollte es eigentlich funktionieren:
Me!SubFormName.setfocus
DoCmd.GoToRecord , , acNewRec
[SubFormName].Form.[FieldName].setfocus
Es kommt auf die Reihenfolge an.
Knobbi38
Hallo Knobbi38,
super, vielen Dank, es hat funktioniert!
Merker an mich: Alles in das FormCurrent des Hauptformulars:
Private Sub Form_Current()
Forms!ofoFormular!ufoKurse.SetFocus
DoCmd.GoToRecord , , acNewRec
ufoKurse.Form.Kursdatum.SetFocus
End Sub