Mailing automatique

Bonjour le forum,

dans une macro, j'utilise la fonction suivante pour envoyer le fichier via e-mail:

ActiveWorkbook.SendMail (Array('DUPONT Théodore', ' DURAND Daniel'))

(donc en messagerie 'réseau interne')

comment faire si je veux envoyer ce même fichier en 'externe' sachant que la fonction:

ActiveWorkbook.SendMail (Array('dupont.théodore@tartenpion.fr', ' DURAND Daniel'))
ne fonctionne pas

Merci
Guy