Pb destnataires mail

Bonjour à toutes et à tous,

J'ai, encore, un petit soucis avec mon envoie de mail. Avec le code qui suit, je devrais l'envoiyer à différents destinataires suivant nba mais il n'en envoie qu'un, les autre reste ds la boite d'envoi.

For ct = 1 To nba
Dest = DE(ct)
Shell 'C:\\Program Files\\Outlook Express\\msimn.exe ' & _
'/mailurl:mailto:' & Dest & '?subject=' & Sujet & '&Body=' & Msg & ''
SendKeys '%I' & 'p' & FichierTemp & '~' & '%s'
Next ct

Avez vous une idée sur la question?
Merci de votre aide et bonne journée.

Eric D