Envoi mail

Bonjour

quand je fais envoi mail j ai l'erreur suivante

erreur d'exécution '- 2147467259 (80004005)'':

Nous avons besoin de connaitre le destinataire .Vérifié que vous avez rentre au moins un nom.

Pouvez vous m'aider le déblogeur m'indique la ligne send

En vous remerciant

orguyrine

Bonjour,

remplace send par display pour voir ce que contient ton mail

attention que certaines pages sont vides dans advpsc2018

fais ceci :

Sub visuadressesmails()

Dim cel As Range
For Each cel In Range("advpsc2018[Mail]")
MsgBox cel
Next

End Sub