Vous pouvez essayer.
INSERTION de CurrentDb.Execute « DANS le tblPySub ([date], [driverID])
VALEURS (# " et format (DateAdd (« d », I + 1, Me.StartDate), « yyyy-millimètre-densité double ») et « #, » et Me.DriverID et ") »
mais il pourrait y a une issue avec me.startdate, ainsi avant que la commande « pour i=… » ajoutent une ligne provisoire.
msgbox me.startdate
et vous veiller pour voir ce que vous comptez.