Pb envoi mail ac adresse

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