Macro enregistrement automatique selon valeur d'une cellule
Bonjour
Je souhaiterais créer une macro pour enregistrer en automatique un fichier excel selon deux valeurs présentent dans des cellules.
Ensuite je souhaiterais basculer en automatique directement vers le dossier cible correspondant une des deux valeurs de cellule.
Exemple : Mon fichier contient un valeur "A" en A1 et une valeur "B" en B1, je souhaite donc le nommer automatiquement A_B.xls et l'enregistrer dans le dossier cible A
J'ai essayé plusieurs mix de codes trouver sur le net mais sans succes...
de plus je cherche la commande pour enregistrer dans le dossier actif ( celui on se trouve deja le fichier vierge)
bonjour,
A= Range("E5").Value
B= Range("E6").Value
ChDir ActiveWorkbook.Path
Repertoirefinalperso = Application.ActiveWorkbook.Path & A &"_" B & ".xls"
tout ceci devrait te permettre d'enregistrer ton fichier au même endroit que ton fichier avec le nom égal au valeur de la cellule E5 et E6
A +
Alexandre
Bonjour
J'ai essayé avec la ligne de commande ci-dessous mais j'ai une erreur de synthaxe, erreur de compilation...
xela81 a écrit :Repertoirefinalperso = Application.ActiveWorkbook.Path & A &"_" B & ".xls"
Si quelqu'un peut m'aider sur ce sujet...
Si quelqu'un peut m'aider sur ce sujet :s je m'en sors pas...
hello !
j'ai oublié de te mettre le reste du code :
ChDir ActiveWorkbook.Path
Repertoirefinalperso = Application.ActiveWorkbook.Path
ActiveWorkbook.SaveAs Filename:=Repertoirefinalperso & "\" & A & "_" & B & ".xls"
Ca devrait fonctionner !
->Alexandre
Répondre c'est bon ca marche !
Merci