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!!!!
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!!!!