Bjr =E0 tous,
Ds 1 frm, j'ai un [date]. Si j'entre une date, je souhaite=20
qu'automatiquement l'enregistrement n=B02 ait 1 jour de=20
plus, L'enregistrement n=B0 3 et 2 jours de plus et ainsi de=20
suite.
Qui pourrait me dire la formule (macro ou code)a mettre=20
Avec mes remerciements,
FD
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
essaie ce genre de procédure: Dim W_date As Date Dim Rs As DAO.Recordset Set Rs = Me.Recordset W_date = Me.Madate Rs.MoveNext Do Until Rs.EOF W_date = W_date + 1 Rs.Edit Rs!Madate = W_date Rs.Update Rs.MoveNext Loop
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FD" a écrit dans le message de news:669101c42e93$0622a320$ Bjr à tous, Ds 1 frm, j'ai un [date]. Si j'entre une date, je souhaite qu'automatiquement l'enregistrement n°2 ait 1 jour de plus, L'enregistrement n° 3 et 2 jours de plus et ainsi de suite. Qui pourrait me dire la formule (macro ou code)a mettre Avec mes remerciements, FD
Bonjour.
essaie ce genre de procédure:
Dim W_date As Date
Dim Rs As DAO.Recordset
Set Rs = Me.Recordset
W_date = Me.Madate
Rs.MoveNext
Do Until Rs.EOF
W_date = W_date + 1
Rs.Edit
Rs!Madate = W_date
Rs.Update
Rs.MoveNext
Loop
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"FD" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:669101c42e93$0622a320$a601280a@phx.gbl...
Bjr à tous,
Ds 1 frm, j'ai un [date]. Si j'entre une date, je souhaite
qu'automatiquement l'enregistrement n°2 ait 1 jour de
plus, L'enregistrement n° 3 et 2 jours de plus et ainsi de
suite.
Qui pourrait me dire la formule (macro ou code)a mettre
Avec mes remerciements,
FD
essaie ce genre de procédure: Dim W_date As Date Dim Rs As DAO.Recordset Set Rs = Me.Recordset W_date = Me.Madate Rs.MoveNext Do Until Rs.EOF W_date = W_date + 1 Rs.Edit Rs!Madate = W_date Rs.Update Rs.MoveNext Loop
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FD" a écrit dans le message de news:669101c42e93$0622a320$ Bjr à tous, Ds 1 frm, j'ai un [date]. Si j'entre une date, je souhaite qu'automatiquement l'enregistrement n°2 ait 1 jour de plus, L'enregistrement n° 3 et 2 jours de plus et ainsi de suite. Qui pourrait me dire la formule (macro ou code)a mettre Avec mes remerciements, FD
