• Initiateur de la discussion Initiateur de la discussion al1000
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

al1000

XLDnaute Impliqué
bonjour,

tous les jours je dois renommer 2 fichiers

le 1 er : matrice raf en 18 8 raf

et le 2em: rec ruf en 18 8 rec ruf


il a t il une possibilité avec une macro?


a+
 
Re : renommer un fichier

Bonjour,

Suite au post n°4 et je voulais que j'inscrive la date manuellment.Alors j'ai inclu une input box.

Voici la maco modifiée:


Datfich = InputBox("Entre la date", "Enregistrement fichier")

If Datfich = "" Then Exit Sub
Name "F:\18 9\essai\matrice raf.xls" As "F:\18 9\essai\" & Datfich & " raf.xls"
Datfich = InputBox("Entre la date", "Enregistrement fichier")

If Datfich = "" Then Exit Sub
Name "F:\18 9\essai\matrice raf.xls" As "F:\18 9\essai\" & Datfich & " raf.xls"

Mais je voudrais conserver le fichier matrice raf toujours en modèle et faire une copie uniquement.


a+
 
Re : renommer un fichier

Bonjour,


Datfich = InputBox("Entre la date", "Enregistrement fichier")

If Datfich = "" Then Exit Sub
Name "F:\18 9\essai\matrice raf.xls" As "F:\18 9\essai\" & Datfich & " raf.xls"

mais je voudrais conserver le fichier matrice raf
a+
 
Re : renommer un fichier

Enregistrer sous ne peut être fait que si on a ouvert le fichier, or il est fermé...

Edit : tu vois, on a mis 20 posts et 1 mois pour répondre à ta question, parce que tu ne l'avais pas posée clairement. C'est dommage, non ?
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
23
Affichages
682
Réponses
15
Affichages
854
  • Question Question
Microsoft 365 Rotations
Réponses
4
Affichages
503
  • Question Question
Microsoft 365 probleme d heure
Réponses
11
Affichages
260
Réponses
5
Affichages
482
Retour