Supportnet Computer
Planet of Tech

Supportnet / Forum / Datenbanken

Anzeige im Unterformular auf letzten Datensatz





Frage

Hallo, ich füge über einen Button Teilnehmer zu einer Liste. Diese wird mir dann als Unterformular in einem Hauptformular angezeigt. Nun möchte ich gern, daß der Datensatzzeiger auf den zuletzt angefügten zeigt. Wie geht das ? Meine Routine seht Ihr unten. Gruß Gudrun Private Sub btnASPersonTeilnahme_Click() On Error GoTo Err_btnASPersonTeilnahme_Click Rem MsgBox " Neue Person hinzufügen zu Recordset der Kreuztabelle" Dim rsMod As DAO.Recordset Set rsMod = CurrentDb.OpenRecordset("tblASBelTeilnahmeKreuz") rsMod.MoveLast With rsMod .AddNew !IDASBel = Me.IDASB !PersNrASBel = KombiPerson.Value .Update [b].MoveLast[/b] End With rsMod.Close [b]Me.ufrmASTeilnahme.Requery[/b] [b]Rem geht zum letzten Datensatz im Hauptformular Rem DoCmd.GoToRecord , , acLast[/b] Exit_btnASPersonTeilnahme_Click: Exit Sub Err_btnASPersonTeilnahme_Click: MsgBox Err.Description Resume Exit_btnASPersonTeilnahme_Click End Sub

Antwort 1 von RalfH

Hallo Gudrun,

In etwa so:

Me![UFoSteuerelement_im_Hauptformular].SetFocus
DoCmd.GoToRecord , , acLast

Gruß Ralf

Antwort 2 von Gudrun11

Danke RalfH

Es funktioniert.

Gruß Gudrun