hvordan opfrisker jeg ?

see your last answer!

Private Sub Command4_Click()
Dim i As Integer
Dim start As Variant


    start = DMax("nummer", "100plus")
   
    If IsNull(start) Then start = 1
    DoCmd.SetWarnings False
    For i = start To start + 99
   
       
        DoCmd.RunSQL "INSERT INTO 100plus ( nummer ) VALUES ( " & i & ")"
       
       
    Next i

    DoCmd.SetWarnings False
    Me.requery
End Sub

Ved at benytte kommandoen Me.Requery køres den underliggende forespørgsel igen, og formularen viser den første post i tabellen.
Hvis du istedet benytter kommandoen Me.Refresh køres den underliggende forespørgsel uden at formularen flytter sig fra den aktuelle post.

refresh tilføjer/fjerner ikke poster. Den opdatere kun de poster, som allerede måtte være i formen.

Derfor forlader den ikke den aktuelle post.

mugs har lidt ret, refresh flytter ikke focus, men den opdaterer altså heller ikke. desværre mugs, det var det andet jeg skulle bruge, men tak for indlægget *S*