Pb envoi mail ac adresse

rjcb

XLDnaute Occasionnel
Bonjour,

J'ai fais une macro permettant d'envoyer la copie de la feuil1 par mail.
Par contre je rencontre un pb:

.SendMail Recipients:=Sheets("Feuil2").Range("E2").Value, .....

Ac la feuil2 cela ne marche pas, mais si je met:

.SendMail Recipients:=Sheets("Feuil1").Range("E2") et l'@ dans la feuille 1 en E2 cela fonctionne.

De plus pour plusieurs destinataires, j'ai mis toto@voila.fr;123@voila.fr ....
Cela ne fonctionne pas. mais pk?

Autre question (je suis gourmand)

J'ai fais une macro sauvegarder sous où cela ouvre une boite de dialogue:

Application.Dialogs(xlDialogSaveAs).Show "\\tonton\Commande_.csv",1

mais avec ,1 cela est valable pour le xls.

Mais pour le csv quel est le chiffre.

Merci
 

Pièces jointes

  • Test223 demandecde.xls
    36.5 KB · Affichages: 44

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
314 062
Messages
2 105 220
Membres
109 290
dernier inscrit
ninouedf