Access - Boton comando NewRec

Hola:

Mi problema es el siguiente: tengo un botón para permitir añadir nuevos registros en un subformulario con el siguiente código

Private Sub BotonAñadir_Click()
Me.SubPrecioTratamiento.Form.AllowAdditions = True

Pero necesitaría que el foco se pusiera en el campo FECHA de un registro nuevo pero no se cómo hacerlo. ¿Alguien me puede ayudar?

Gracias a todos

Ya he conseguido solucionarlo. Dejo la solución por si le pudiera servir a alguien

Private Sub Comando51_Click()
Me.SubPrecioTratamiento.SetFocus
Me.SubPrecioTratamiento.Form.AllowAdditions = True
DoCmd.GoToRecord , , acNewRec

End Sub