jeremie78420
XLDnaute Nouveau
Bonjour à tous,
Voici ma situation :
- J'ai crée une macro simple pour enregistrer dans un fichier excel à part une feuille de mon classeur.
Voici le code (simplifié) que j'utilise pour cela :
En cherchant sur Internet, j'ai trouvé la commande
, qui fonctionne si je la mets dans mon code, mais je souhaiterais alors intégrer comme nom par défaut le même que dans mon code "Ma feuille + Date + xlsx", ce que je n'arrive pas à faire pour le moment
Comment réaliser ceci ?
Existe-t-il une méthode simple pour cela ? Est-ce possible ?
Merci par avance
Jérémie
Voici ma situation :
- J'ai crée une macro simple pour enregistrer dans un fichier excel à part une feuille de mon classeur.
Voici le code (simplifié) que j'utilise pour cela :
Code:
' Je rends la feuille que je veux enregistrer en .xlsx visible
Sheets("Mafeuille").Visible = True
' Si des filtres sont activés sur cette feuille, je les enlève
If ActiveSheet.FilterMode Then
ActiveSheet.ShowAllData
End If
' Je sauvegarde cette feuille dans un nouveau fichier .xlsx auquel j'ajoute la date
ActiveSheet.Copy
ActiveWorkbook.SaveAs Filename:="Ma feuille - " + VBA.Strings.Format(Now, "mmddyyyy") + ".xlsx"
ActiveWorkbook.Close
Sheets("Mafeuille").Visible = False
'Message de fin
MsgBox ("File has been save in the same directory as the Report")
En cherchant sur Internet, j'ai trouvé la commande
Code:
Application.Dialogs(xlDialogSaveAs).Show
Comment réaliser ceci ?
Existe-t-il une méthode simple pour cela ? Est-ce possible ?
Merci par avance
Jérémie
Code:
Dernière édition: