XL 2010 macro copier envoyer par mail un onglet

mix770

XLDnaute Impliqué
bonjour à vous,

je travail sur un fichier avec des onglets et liens de calcul
j'aurais besoin d'une macro qui ferai un copie de l'onglet au format excel en le rennomam au format Nom_MOIS_AN et l'insère dans un mail outlook avec adresse préprogrammée
j'ai déja fait une fois une macro pour exporter au format PDF ou pour ouvrir un mail mais là je seche
merci à vous
ci dessous une ebauche VBA

Dim stHeureExport As String
stHeureExport = "_" & _
Format(Hour(Time), "00") & "" & Format(Minute(Time), "00") & "" & _
Format(Second(Time), "00")
NomCompletFichier = ChDir & "\" & NomFichier & stHeureExport

'Copie de la feuille courante dans un nouveau classeur et enregistrement
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:=NomCompletFichier
ActiveWorkbook.Close

MsgBox "le fichier a été enregistré sous le nom : " & vbCrLf & NomCompletFichier
 

mix770

XLDnaute Impliqué
Bonjour staple 1600,

tout d'abord respect ..

je savais que j'avais déja fais ce genre de demande, mais je me suis fais voler mon pc et beaucoup de donner il y a 3 ans.
c'est vraiment cool, je travail dessus et fais un retour
bien à toi
 

Discussions similaires

Statistiques des forums

Discussions
312 088
Messages
2 085 203
Membres
102 818
dernier inscrit
NeoMaint