envoi d'une par mail

ziopizza

XLDnaute Occasionnel

• 9 Février 2006

• #2

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

 

Vote positif 0 Vote négatif

J

jer84

Guest

• 9 Février 2006

• #3

ziopizza bonsoir

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

A+

 

Vote positif 0 Vote négatif

ziopizza

XLDnaute Occasionnel

• 10 Février 2006

• #4

Bonjour jer84 et le Forum,

Explication en fichier joint.
@+
Yves

?...Pardon oublié le fichier

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

 

Pièces jointes

• explications_20060210145203.zip

  6.3 KB · Affichages: 10

Vote positif 0 Vote négatif

ziopizza

XLDnaute Occasionnel

• 10 Février 2006

• #5

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]

 

Pièces jointes

• explications_20060210151829.zip

  6.9 KB · Affichages: 18

Vote positif 0 Vote négatif

J

jer84

Guest

• 10 Février 2006

• #6

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+

 

Vote positif 0 Vote négatif

ziopizza

XLDnaute Occasionnel

• 10 Février 2006

• #7

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

 

Vote positif 0 Vote négatif