Je vous remercie de prendre le temps d'écrire ce message.
Votre nom (ou pseudo) :
Votre e-mail :
S'abonner à ce fil de discussion :
Vous répondez à Polux qui a écrit :
Bonsoir,
Je viens d'essayer ce code ci-dessous mais il doit y avoir une grossière erreur !
Private Sub Commande58_Click()On Error GoTo Err_Commande58_ClickDim stDocNamestDocName = "ServiluxXlsGARANTIE";"ServiluxXlsHorsGarantie"DoCmd.SendObject acSendReport, stDocNameExit_Commande58_Click: Exit SubErr_Commande58_Click: MsgBox Err.Description Resume Exit_Commande58_Click End Sub