Discussion :

[antezi]

Bonjour à tous,

J'aimerais envoyer une lettre de rappel pour les clients qui n'ont pas encore payés les factures. J'ai une base de données facturation ayant deux tables: table clients et table factures. Comme je connais pas VBA, j'aimerais avoir un code vba pour le pseudocode suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Lancer la requête pour voir les factures non payées
Pour chaque enregistrement du resultat de la requête
   Calcul nombre de jours de retard//calcul sur les dates:datejour - dafacture
   Si retard > 20 jours
         -> Faire une lettre de rappel;
   Fsi
 
Fpour

Quelqu'un pourrait me donner un code vba pour ce pseudocode, eventuellement si vous avez des idées comment implémenter cette lettre de rappel sous access, merci de me les donner.

Merci d'avance

Antezi

[curt]

Bonjour,

passe plutôt par SQL avec l'éditeur graphique en suivant tes données de base.

Curt

[Invité]

tu peux essayer un truc du genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Form_Open(Cancel As Integer)
RecordSource = "select * from MaTableFacture where date – datefacture > 20 order by DateFacture;”
End Sub

ou alors sur le clic d'un bouton.