Bjr
Dernières ligne droite, j'arrive au bout, seul petit souci, je voudrais envoyer en pj est en pdf mes états a différents destinataires.

Quand je clique sur mon bouton rien ne se passe.
Quelqu'un pourrait svp me dire ou est l'erreur.
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub cmdEnvoyer_Click()
On Error GoTo err
    DoCmd.SendObject acSendReport, "EtatTourn", _
    "Forms!FormNavigation!SF_TournPatient.Form!DatePrint between [DebutSoins] and [FinSoins] And [Tournées] = Forms!FormNavigation!SF_TournPatient.Form!SelectTourn", _
        "PDF", "destinataire@fai.com", , , "Liste des clients", _
        "Veuillez trouver la liste des clients en pièce-jointe"
 
fin:
Exit Sub
 
err:
'    If err.Number <> 2501 Then err.Raise err.Number, , err.Description
    Resume fin
End Sub