Macro pour dupliquer une feuille excel

Fermé
zaza0210 - 2 sept. 2016 à 16:42
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 - 2 sept. 2016 à 17:42
Bonjour,

Je cherche comment dupliquer une feuille excel avec une macro dans un autre dossier mais je ne trouve pas sur le forum.
J'ai une liste déroulante qui me permet de choisir un paramètre (en l'occurence un lieu X) et cela me donne les résultats de ce lieu. il y a 35 lieux dans la liste déroulante et je voudrais pouvoir mettre à la disposition des responsables de site leurs résultats mensuels dans un autre dossier propre à chaque lieu.
Je voudrais faire cela par le biais d'une macro que je lancerais tous les mois.

Helppppp ! merci d'avance.


A voir également:

1 réponse

melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
2 sept. 2016 à 17:42
Bonjour,

Sans le fichier, difficile mais voici un début de code

Sub Macro1()
'
' Macro1 Macro
'

'

'permet de copier la feuille 1 dans un nouveau classeur
Sheets("Sheet1").Copy
'permet de définir le dossier d'enregistrement de la nouvelle feuille
ChDir "C:\Users\apilette\Desktop"
'permet de sauvegarder le classeur avec le nom du lieu
ActiveWorkbook.SaveAs Filename:="C:\Users\apilette\Desktop\Sheets1.xlsx", _
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
'permet de fermer le classeur
ActiveWindow.Close
End Sub
0