Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Enregistrer sous .....

  • Initiateur de la discussion Initiateur de la discussion wachoo31
  • 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 !

wachoo31

XLDnaute Occasionnel
Bonjour à toutes et tous vous les excelliens de qualité

Mon problème du jour:

je voudrais créé une macro pour enregistrer une copie de feuille sous un nom de fichier défini par le contenu d'une cellule mais le gros problème est que je voudrais pouvoir a chaque fois choisir le répertoire de destination sans pouvoir changer le nom du fichier.

Je sais je suis compliqué mais bon. Cela est il possible et comment faire
 
salut wachoo

cet exemple te montre comment enregistrer le classeur entier
mais si ton probleme est juste de pouvoir lui dire toi meme le chemin, ça devrait répondre a ta question


Dim titre_fichier As String
titre_fichier = Range('A1').Value

Dim chemin As String
chemin = InputBox('Saisissez votre chemin ci-dessous', 'Fichier')

ActiveWorkbook.SaveCopyAs (chemin & titre_fichier)


bonne prog
(tu peux me joindre par mail : tumpraitta106@free.fr)
 
Bonsoir poum, Re le forum

Merci pour ton code cela m'avance déjà mais n'est 'il pas possible au lieu de l'imputbox de faire apparaitre la fenetre comme quand on fait un enregistrer sous, cela m'aurai mieux aider

Bonne soirée a tous, je vais plancher encore quelque heure sur le sujet
 
Bonsoir poum, Re le forum

Merci pour ton code cela m'avance déjà mais n'est 'il pas possible au lieu de l'imputbox de faire apparaitre la fenetre comme quand on fait un enregistrer sous, cela m'aurai mieux aider

Bonne soirée a tous, je vais plancher encore quelque heure sur le sujet
 
- 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
6
Affichages
569
Réponses
3
Affichages
208
Réponses
37
Affichages
1 K
Réponses
14
Affichages
324
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…