Envoyer une feuille d'un classeur par mail

Bonjour,

Copier/coller dans une autre feuille d'un autre classeur.
Utilisé le collage spéciale pour ne récupérer que les
données.

Copier/Collage spécial (valeurs)

mousnynao!

-----Message d'origine-----
Bonsoir à toutes et à tous,

je souhaite envoyer par e-mail une feuille d'un classeur
Excel (une seule

feuille)
(avec des formules cherchant des valeurs sur les autres
feuilles du même

classeur)

quelqu'un aurait-il une solution?


merci d'avance

Thierry K
Excel 2000


.

Salut,
J'ai fais un truc comme ça au boulot, pas très pro mais ça marche
Je copie la feuille Fax-centre que je renomme Planning et j'envoie cette
unique feuille dans un classeur planning.xls...
Domi

Sub EnvoyerFeuilleEmail()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
ThisWorkbook.Sheets("FAX_CENTRE").Copy
Sheets("FAX_CENTRE").Name = "PLANNING"
ActiveWorkbook.SaveAs FileName:="C:Mes documentsPlanning.xls",
FileFormat _
:=xlNormal, Password:="", WriteResPassword:="",
ReadOnlyRecommended:= _
False, CreateBackup:úlse
'pour n'envoyer que des valeurs
Cells.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone,
SkipBlanks:úlse, Transpose:úlse
Range("J2").Select
Application.CutCopyMode = False
Application.Dialogs(xlDialogSendMail).Show
Workbooks("Planning.xls").Close
'Sheets("IMPORT").Activate

End Sub

"selestat.bc" <selestat.bcxy@wanadoo.fr> a écrit dans le message de news:
c136k5$5hd$1@news-reader2.wanadoo.fr...

Bonsoir à toutes et à tous,

je souhaite envoyer par e-mail une feuille d'un classeur Excel (une seule
feuille)
(avec des formules cherchant des valeurs sur les autres feuilles du même
classeur)

quelqu'un aurait-il une solution?


merci d'avance

Thierry K
Excel 2000