Bueno ya te habia respondido en el foro de Word pero aqui esta de nuevo.
Para hacer eso debes programar el evento GotFocus de la caja de texto, en ese codigo debes usar la propiedad SelStart que es la que indica donde aparecera el cursor(Para este caso)
Private Sub txtDato_GotFocus()
If IsNull(txtDato.Value) = False Then
txtDato.SelStart = Len(txtDato.Value)
End If
End Sub
lo que hacemos es situar el cursor en el ultimo cartacter que tiene la caja