Access - Necesito ayuda para agregar un registro a una tabla en access usando VBA solo 2 veces por dia

...

    Dim Rst As DAO.Recordset 'Definimos una variable para el recordset

...

    Set Rst = CurrentDB.OpenRecordset("Tabla") 'Abrimos la tabla en la variable

    Rst.AddNew 'Añadimos un nuevo registro

    Rst!CampoNum1 = ValorNum1 'Añadimos los campos numéricos

    Rst!CampoTex2 = "ValorTex2" 'de texto

    Rst!CampoFec3 = #ValorFec3# 'y de fecha respetando la sintáxis

    ...

    Rst.Update 'Actualizamos el registro

...

    Rst.Close 'Cerramos el recordset

    Set Rst = Nothing 'Vaciamos la variable

FOR a =1 TO 2

    Dim Rst As DAO.Recordset 'Definimos una variable para el recordset

...

    Set Rst = CurrentDB.OpenRecordset("Tabla") 'Abrimos la tabla en la variable

    Rst.AddNew 'Añadimos un nuevo registro

    Rst!CampoNum1 = ValorNum1 'Añadimos los campos numéricos

    Rst!CampoTex2 = "ValorTex2" 'de texto

    Rst!CampoFec3 = #ValorFec3# 'y de fecha respetando la sintáxis

    ...

    Rst.Update 'Actualizamos el registro

...

    Rst.Close 'Cerramos el recordset

    Set Rst = Nothing 'Vaciamos la variable

NEXT