Fermer un classeur vba

[Marie30]

Bonjour à tous,

Je refais appel à vous car je ne sais pas comment faire.

J'ai une macro qui permet de copier les infos d'un USF dans un nouveau classeur, puis d'envoyer ce classeur par mail. Je souhaiterai que le classeur créé se referme automatiquement.

J'ai donc essayé :

Sheets("Feuil8").Copy
  ActiveWorkbook.SendMail Recipients:="XXXXX@XXX.com", _
                          Subject:="Demande de création fiche FRS"

Workbooks(2).Close false

Mon workbook close marche très bien mais dans le cas où j'ai plusieurs fichiers ouverts il me ferme le numéro 2 et non pas le fichier créé initialement...

Savez vous comment faire pour fermer automatiquement le fichier envoyé par mail ?

Merci

Marie 30

ps: je reste disponible si vous avez des questions .

 

[smotty]

Re : Fermer un classeur vba

bonjour,

activeworkbook.close

devrait fonctionner

sinon, pour être sûr du classeur que vous fermez:

Sheets("Feuil8").Copy
NomClasseur=activeworkbook.name
  ActiveWorkbook.SendMail Recipients:="XXXXX@XXX.com", _
                          Subject:="Demande de création fiche FRS"

Workbooks(NomClasseur).Close false

cdt

smotty