VBA/Excel/Access/Word/Forms/Focus

If current record is new record, grab the focus

   <source lang="vb">

Private Sub Form_Current()

   If Me.NewRecord Then
       Me.txtContactFirstName.SetFocus
   End If

End Sub

</source>