Macro enregistrer qu'une seule feuille dans dossier variant
Bonjour,
Voila j'aimerai modifier la macro suivante qui fonctionne mais qui enregistrerai seulement une seule feuille et pas le classeur entier sachant que la cellule "C1" varie par le biais d'un menu déroulant (liste) en donnant le nom des feuilles du classeur.exemple si "C1"=feuil2 =n'enregistrer que la feuil2 sous" répertoire variant celon les cellules A1 et B1 qui définissent l'emplacement d'enregistrement ainsi que le nom.
voici ma macro:
Sub enregistrer()
Dim Chemin As String, repertoire As String, NomFichier As String
A = Range("A1").Value
B = Range("B1").Value
C = Range("C1").Value
Chemin = "c:\ARCHIVE\" & Range("C1").Value & "\"
NomFichier = "" & A & " " & B & " .xls"
repertoire = Range("C1").Value
ThisWorkbook.SaveAs Chemin & repertoire & NomFichier
End Sub
Voila je vous remercie d'avance pour votre aide ça fait des heures que je planche dessus et rien à faire, pour info novice en vba.Si correction en plus dans ma macro d'origine à apporter pour amélioration encore merci!!!!
Bonjour,
Je ne comprends pas ta demande. On n'enregistre pas une feuille mais bien un classeur excel c'est à dire le fichier excel.
précison: dans c:\ARCHIVE\ J'ai créer plusieurs dossier correspondant à l'emplacement de destination celon la variable de la cellule c1 soit:
c::\ARCHIVE\feuil2
c::\ARCHIVE\feuil3
c::\ARCHIVE\feuil4
donc dans mon classeur en feuil1 quand je sélectionne la liste déroulante en c1 pour feuil2 , je voudrai que seulement la feuil2 s'enregistre dans c::\ARCHIVE\feuil2 et pas le classeur entier, pareil pour feuil3 dans c::\ARCHIVE\feuil3\mon fichier.xls
je compte mettre en place ce code à mon boulot pour archiver toutes les fin de semaines (vendredi) avec le nom du fichier qui change par le biais de la cellule b1 qui donne le numero de la semaine et l'emplacement de destination correspondant.
merci d'avance pour votre aide précieuse
Bonjour Banzai64 ,
je viens de tester ton code, superbe ,magnifique , il marche du feu de dieu!!!!!!
je manque de superlatif pour te remercier tellement je suis content
un grand merci d'avoir pris le temps pour moi
a bientôt tu est un chef
bravo!!!!!
a+
spudy