OVH Cloud OVH Cloud

Comparaison d'une date avec une macro

4 réponses
Avatar
daniel
Bonjour,

Avec une macro Access, j'aimerai comparer la date du jour avec les dates qui
se trouve dans une table. Si la date du jour se trouve déjà dans la table, il
faut que la macro n'exécute plus la suite des opérations.

Merci d'avance pour votre aide.
Daniel

4 réponses

Avatar
cabinet.irdem
bjr d'irdem
SELECT age.DateNaissance, Year(Date())-Year([DateNaissance]) AS
AgeCapitaine, IIf([AgeCapitaine] Between 1 And 10,1,0) AS [1-10],
IIf([AgeCapitaine] Between 11 And 20,1,0) AS [11-20], IIf([AgeCapitaine]
Between 21 And 30,1,0) AS [21-30]
FROM age;
voici un exemple à créer sous une requête....
tu peux l'écrire en vba aussi


Bonjour,

Avec une macro Access, j'aimerai comparer la date du jour avec les dates qui
se trouve dans une table. Si la date du jour se trouve déjà dans la table, il
faut que la macro n'exécute plus la suite des opérations.

Merci d'avance pour votre aide.
Daniel


Avatar
daniel
Merci pour ce début de solution.

Mais comment faire pour arrêter l'execution de la macro si la date existe
déja dans la table.

J'ai une requête "qryCtrlDate" qui prend la dernière date de ma table
(SELECT Last(StatInvHW.VarDate) AS CtrlVarDate FROM StatInvHW;)

Contenu de la macro :

OuvrirRequête qryCtrlDate

et maintenant j'aimerai que si la date correspond à la date du jour -7 jour
que la macro n'exécute plus la suite des opérations.

Merci pour votre aide.

A+


bjr d'irdem
SELECT age.DateNaissance, Year(Date())-Year([DateNaissance]) AS
AgeCapitaine, IIf([AgeCapitaine] Between 1 And 10,1,0) AS [1-10],
IIf([AgeCapitaine] Between 11 And 20,1,0) AS [11-20], IIf([AgeCapitaine]
Between 21 And 30,1,0) AS [21-30]
FROM age;
voici un exemple à créer sous une requête....
tu peux l'écrire en vba aussi


Bonjour,

Avec une macro Access, j'aimerai comparer la date du jour avec les dates qui
se trouve dans une table. Si la date du jour se trouve déjà dans la table, il
faut que la macro n'exécute plus la suite des opérations.

Merci d'avance pour votre aide.
Daniel




Avatar
3stone
Salut,

"daniel"
| Avec une macro Access, j'aimerai comparer la date du jour avec les dates qui
| se trouve dans une table. Si la date du jour se trouve déjà dans la table, il
| faut que la macro n'exécute plus la suite des opérations.


if Dcount("*","[LaTable]","[ChampDate]=" & Format(Date,"#mm-dd-yyyy#")>0 then
' date existe
else
' date n'existe pas
end if


--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Email : http://www.cerbermail.com/?Xfg61Z3IQw
Avatar
cabinet.irdem
<bjr>irdem</bjr>
regardes sur l'aide d'access à:

"Rendre une macro exécutable dans des conditions particulières"
il est possible de spécifier les conditions

ilya d'autres solutions en vba
if date..........then DoCmd runmacro .......Else .....
m'enfin....



Merci pour ce début de solution.

Mais comment faire pour arrêter l'execution de la macro si la date existe
déja dans la table.

J'ai une requête "qryCtrlDate" qui prend la dernière date de ma table
(SELECT Last(StatInvHW.VarDate) AS CtrlVarDate FROM StatInvHW;)

Contenu de la macro :

OuvrirRequête qryCtrlDate

et maintenant j'aimerai que si la date correspond à la date du jour -7 jour
que la macro n'exécute plus la suite des opérations.

Merci pour votre aide.

A+


bjr d'irdem
SELECT age.DateNaissance, Year(Date())-Year([DateNaissance]) AS
AgeCapitaine, IIf([AgeCapitaine] Between 1 And 10,1,0) AS [1-10],
IIf([AgeCapitaine] Between 11 And 20,1,0) AS [11-20], IIf([AgeCapitaine]
Between 21 And 30,1,0) AS [21-30]
FROM age;
voici un exemple à créer sous une requête....
tu peux l'écrire en vba aussi


Bonjour,

Avec une macro Access, j'aimerai comparer la date du jour avec les dates qui
se trouve dans une table. Si la date du jour se trouve déjà dans la table, il
faut que la macro n'exécute plus la suite des opérations.

Merci d'avance pour votre aide.
Daniel