envoi d'une par mail

[jer84]

bonsoir à tous,

j'ai oublié une question dans ma précédente demande
Est il possible d'envoyer par mail une feuille de calcul entant que pièce jointe?

merci de la réponse

 

[ziopizza]

Bonjour jer 84 et le Forum,
Essaye ce code.

Sub SendFeuille()


Workbooks('Classeur1').Sheets('Feuil1').Copy
'adresse a changer
ActiveWorkbook.SendMail _
Recipients:='kkkk@oooo.com', Subject:='Coucou'
End Sub
Yves

 

[jer84]

ziopizza bonsoir

excuse moi mais je ni connait rien dans les codes
peu tu m'expliquer comment faire

A+

 

[ziopizza]

Bonjour jer84 et le Forum,

Explication en fichier joint.
@+
Yves

?...Pardon oublié le fichier

Message édité par: ziopizza, à: 10/02/2006 15:09

 

[ziopizza]

Voila le Fichier ouf! [file name=explications_20060210151829.zip size=7057]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/explications_20060210151829.zip[/file]

 

[jer84]

bonsoir ziopizza et le forum

merci cela marche mais je cherche a envoyer cette feuille à plusieurs personnes (150) comment je peux faire car taper tous les noms dure dure ?
as tu la réponse et merci A+

 

[ziopizza]

Bonsoir Jer84,et leForum

Suit ce lien tu devrais trouver ton bonheur,


https://www.excel-downloads.com/threads/envoi-feuille-active-par-mail.30436/

Yves