Envoi classeur actif - problème avec activeworkbook.send mail

[antiphot]

Bonjour à toutes et à tous.

Dans la macro ci-dessous, j'envoie (ou tout du moins j'essaie )le classeur actif à une liste de personnes située en A de ma feuil6. Cette liste étant variable alimentée par une listbox.
Mais bon cela ne fonctionne pas

Si quelqu'un peut m'indiquer la bonne voie, il a d'ors et déjà toute ma reconnaissance

Philippe

Code:

Dim destinataire As String
With Sheets("feuil6")
For Each cel In .Range("A2:A" & .Range("A65536")(xlUp).Row)
destinataire = cel.Value
ActiveWorkbook.SendMail Recipients:=Array(destinataire), Subject:="COMMANDE N°" & Sheets("feuil2").Range("AX").Value & Format(Range("B3"), "dd-hms")
Next cel
End With
End If

 

[Claudy]

Re : Envoi classeur actif - problème avec activeworkbook.send mail

Bonjour,
Range ("AX") ???
a+

 

[antiphot]

Re : Envoi classeur actif - problème avec activeworkbook.send mail

Arggh, heureusement le weekend approche.
En tout cas merci Claudy pour ta remarque