Exporter une feuille en nouveau classeur

[poussy67]

Bonjour le forum


J’ai un classeur inventaire qui me permet de faire une comparaison entre 2 outils,
Une fois que la comparaison faite, je voudrais exporter une copie d’une feuille nommé Différence en nouveau classeur nommé Inventaire_Date
Est il possible en vba d’exporter une copie d’une feuille en nouveau classeur et comment ?

Cdt Poussy

Merci d’avance pour le coup pouce

 

[Guest]

Re : Exporter une feuille en nouveau classeur

bonjour,

Macro, a mettre dans le classeur d'origine.

Sub ExporterFeuilleActive()
    ActiveSheet.Copy
   'Chemin à adapter
    ActiveWorkbook.SaveAs ThisWorkbook.Path & "\Inventaire_" & Format(Date, "yyyymmdd")
  'Si tu veux le fermer tout de suite décommente la ligne ci-dessous
   ' ActiveWorkbook.Close
End Sub

A+

 

[13GIBE59]

Re : Exporter une feuille en nouveau classeur

Bonjour Poussy67

Essaie ça pour ton classeur ouvert sur la feuille que tu veux enregistrer :

Sub enregistrerfeuille
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:= Inventaire_Date
End Sub

Edit : oups ! Hasco est bien meilleur que moi !

 

[poussy67]

Re : Exporter une feuille en nouveau classeur

Merci beaucoup
cela me convient très bien