Re:Comment envoyer une feuille d'un classeur par m
salut'Jean-Pierre'
bon je ne suis pas un expert mais tu devrais en suivant ce fil avoir la solution
l'une des méthde se trouve dans le lien que je t'ai donné
sous cette forme
Envoi feuille active par mail
Auteur: myDearFriend (---.adsl.proxad.net)
Date: 20-01-05 22:19
Sub EnvoiPage()
Dim Destinataires(3) As String, Sujet As String
Dim AccuseReception As Boolean
Destinataires(1) = 'Destinataire1@domaine.fr'
Destinataires(2) = 'Destinataire2@domaine.fr'
Destinataires(3) = 'Destinataire3@domaine.fr'
Sujet = 'Objet éventuel de l'envoi'
AccuseReception = True
ThisWorkbook.Sheets('taPage').Copy
ActiveWorkbook.SendMail Destinataires, Sujet, AccuseReception
ActiveWorkbook.close false
End Sub
le tableau là, a pour nom Destinataires(3) et a trois Items
voir partie en Gras ,là ce trouvent les adresses des destinataires
suis ton fil