Bonjour =E0 tous.
J'ai une table avec trois champs (entre autres):
Nom Soci=E9t=E9 - D=E9but Contrat - Fin Contrat - Pr=E9avis
Dupont 15/10/2000 15/02/2004 3mois =20
Je voudrais que vba me renvoie un message 15jours avant le=20
pr=E9avis soit par mail soit par message ce qui me=20
permettrait de voir si je dois r=E9silier le contrat ou non.
Merci pour votre collaboration.
Bonne journ=E9e.
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
Bonjour.
tu dois utiliser une fonction comme ceci: Dim Date_Préavis As Date 'exemple Date_Préavis = #2/1/2004# 'exemple If DateDiff("d", DateAdd("m", -3, Date_Préavis) - 15, Date) >= 0 Then MsgBox "Préavis dans 15 jours" End If tu peux placer cette fonction dans une requête pour lister tous les contrats concernés tous les matins. si tu veux envoyer un mail, tu fais un formulaire que tu lances par la macro autoexec, qui teste tous les contrats et t'envoie un mail (avec le contrat en pièce jointe). voir : http://access.seneque.free.fr/envoi_message.htm pour le mail.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Ray" a écrit dans le message de news:0d1b01c393ac$c8974280$ Bonjour à tous. J'ai une table avec trois champs (entre autres): Nom Société - Début Contrat - Fin Contrat - Préavis Dupont 15/10/2000 15/02/2004 3mois
Je voudrais que vba me renvoie un message 15jours avant le préavis soit par mail soit par message ce qui me permettrait de voir si je dois résilier le contrat ou non. Merci pour votre collaboration. Bonne journée.
Bonjour.
tu dois utiliser une fonction comme ceci:
Dim Date_Préavis As Date 'exemple
Date_Préavis = #2/1/2004# 'exemple
If DateDiff("d", DateAdd("m", -3, Date_Préavis) - 15, Date) >= 0 Then
MsgBox "Préavis dans 15 jours"
End If
tu peux placer cette fonction dans une requête pour lister tous les contrats
concernés tous les matins. si tu veux envoyer un mail, tu fais un formulaire
que tu lances par la macro autoexec, qui teste tous les contrats et t'envoie
un mail (avec le contrat en pièce jointe).
voir : http://access.seneque.free.fr/envoi_message.htm pour le mail.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Ray" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:0d1b01c393ac$c8974280$a101280a@phx.gbl...
Bonjour à tous.
J'ai une table avec trois champs (entre autres):
Nom Société - Début Contrat - Fin Contrat - Préavis
Dupont 15/10/2000 15/02/2004 3mois
Je voudrais que vba me renvoie un message 15jours avant le
préavis soit par mail soit par message ce qui me
permettrait de voir si je dois résilier le contrat ou non.
Merci pour votre collaboration.
Bonne journée.
tu dois utiliser une fonction comme ceci: Dim Date_Préavis As Date 'exemple Date_Préavis = #2/1/2004# 'exemple If DateDiff("d", DateAdd("m", -3, Date_Préavis) - 15, Date) >= 0 Then MsgBox "Préavis dans 15 jours" End If tu peux placer cette fonction dans une requête pour lister tous les contrats concernés tous les matins. si tu veux envoyer un mail, tu fais un formulaire que tu lances par la macro autoexec, qui teste tous les contrats et t'envoie un mail (avec le contrat en pièce jointe). voir : http://access.seneque.free.fr/envoi_message.htm pour le mail.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Ray" a écrit dans le message de news:0d1b01c393ac$c8974280$ Bonjour à tous. J'ai une table avec trois champs (entre autres): Nom Société - Début Contrat - Fin Contrat - Préavis Dupont 15/10/2000 15/02/2004 3mois
Je voudrais que vba me renvoie un message 15jours avant le préavis soit par mail soit par message ce qui me permettrait de voir si je dois résilier le contrat ou non. Merci pour votre collaboration. Bonne journée.
