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

Sauvegarde classeur : nom en fonction de la valeur d'une cellule ?

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Belokan
  • 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 !

S'inscrire
B

Belokan

XLDnaute Nouveau
Bonjour tout le monde,


Je cherche à créer une macro (je ne pense pas que cela soit possible autrement) pour enregistrer le classeur courant et l'envoyer ensuite par mail. La partie mail, c'est bon, ça marche.
Par contre, comment je pourrais faire pour sauvegarder le classeur sous un nom défini dans une cellule du classeur et y rajouter la date du jour par exemple ?

Petit hic : la cellule en question est une liste déroulante (Validation de données) contenant des mots séparés par des espaces, or le nom du classeur ne doit pas comporter d'espace (à remplacer par des _ éventuellement).

Pour résumé :
- j'ai une cellule A1 qui comprend une liste déroulante (exemple : nom X)
- je souhaite enregistrer le classeur courant sous le nom affiché dans cette cellule, y adjoindre la date du jour et remplacer les espaces par des _ (exemple : nom_X-27012011.xls)

Suis assez clair ? 😕
Est-ce jouable selon vous ?


Merci d'avance pour vos retours. 🙂

@tte,
Belokan
 
Dernière édition:
Trier par date Trier par votes
Re : Sauvegarde classeur : nom en fonction de la valeur d'une cellule ?

Bonjour Belokan,

Est-ce jouable selon vous ?
Cliquez pour agrandir...

Oui

Ce qui est sûr, c'est que tu devras passer par un SaveAs, mais à priori il faut quelques informations en plus :

sous quel chemin enregistrer le fichier (dans quel dossier)
le fichier à enregistrer est celui contenant la macro ou un autre classeur ouvert ? est-ce le classeur actif lors de l'enregistrement ?
Dans quelle feuille de ce classeur (ou de celui contenant la macro, à préciser) se trouve la cellule A1 où se trouve le nom à attribuer au classeur
 
Vote positif 0 Vote négatif
Re : Sauvegarde classeur : nom en fonction de la valeur d'une cellule ?

Bonjour belokan, Toto,

essaye ceci pour un enregistrement dans le répertoire courant :
Code: 
ActiveWorkbook.SaveAs Range("A1").Value & Format(Date, "ddmmyyyy")

Bon après midi
@+
 
Vote positif 0 Vote négatif
Re : Sauvegarde classeur : nom en fonction de la valeur d'une cellule ?

Merci à vous pour ces retours !

@tototiti2008 :
1) il faudrait enregistrer le fichier sur le bureau, ou MesDocuments, ou tout autre endroit qui serait commun à plusieurs ordinateurs. Le fichier étant utilisé par plusieurs, sur différents postes, il faudrait quelque chose de cohérent.
2) Tout est dans le même classeur, y compris les macros. Le classeur comporte une feuille de forumulaire (à remplir par l'utilisateur), une de données, une d'explication et une d'historique. L'utilisateur ne pouvant accéder qu'à la première, les autres étant protégées en lecture.
3) La cellule A1 se trouve dans la première feuille (intitulée Formulaire), là où se trouvera un bouton pour sauvegarder et envoyer.

@Pierrot93 : merci pour ta formule, l'idée est bien là ! Je remarque que bien que le fichier soit sur le bureau, la macro me l'enregistre dans MesDocuments (mais pourquoi pas) : est-ce normal ? Reste à trouver comment remplacer les espaces par des _ ...
 
Vote positif 0 Vote négatif
Re : Sauvegarde classeur : nom en fonction de la valeur d'une cellule ?

Re,

pour un enregistrement sur le bureau :
Code: 
Dim chemin As String
chemin = CreateObject("WScript.Shell").specialFolders("Desktop")
ActiveWorkbook.SaveAs chemin & "\" & Replace(Range("A1").Value, " ", "_") & Format(Date, "ddmmyyyy")

traite également le remplacement des espaces...

bon après midi
@+
 
Vote positif 0 Vote négatif
Re : Sauvegarde classeur : nom en fonction de la valeur d'une cellule ?

Super Pierrot93, c'est exactement ça, merci beaucoup !!!
Et du coup je vois maintenant le cheminement pour éventuellement changer le nom à ma sauce. 😀
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

J
  • Question Question
XL 2010 définir un nom de cellule en fonction de la valeur d'une autre
Réponses
12
Affichages
991
jojo4738
J
N
  • Question Question
Microsoft 365 Sélectionner cellule en fonction d'une liste déroulante
Réponses
9
Affichages
202
Dranreb
  • Résolu(e)
Microsoft 365 référence feuille en fonction du nom d'une cellule
Réponses
4
Affichages
210
tristan05
Y
  • Résolu(e)
XL 2016 Validation de données en fonction d'une table
Réponses
3
Affichages
101
youguybass
Y
I
  • Résolu(e)
Microsoft 365 Exécuter une macro en fonction de la valeur d'une cellule
Réponses
12
Affichages
715
iliess
I
R
  • Question Question
XL pour MAC Action d'une formule conditionnelle dans une cellule en fonction de la couleur de cette cellule
2
Réponses
17
Affichages
426
rtlv17
R
  • Question Question
XL 2016 [Resolu]Fond de couleur de la cellule en fonction du texte choisi
Réponses
12
Affichages
191
job75
S
  • Question Question
XL 2016 formule de calcul en fonction du choix de la liste déroulante
2
Réponses
18
Affichages
985
Silent
S
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
314
Phil69970
K
  • Question Question
Microsoft 365 Réservation salle de réunion
Réponses
5
Affichages
485
Deleted member 453598
D
N
  • Question Question
XL 2013 Fixer la valeur d'une cellule saisie en fonction d'un nombre de décimal défini
Réponses
6
Affichages
365
mapomme
F
  • Question Question
Autres Récupération de données d'une feuille X en fonction de la valeur de cellule dans une collone d'une feuille Y
2
Réponses
27
Affichages
925
fanfan38
S
  • Résolu(e)
Microsoft 365 Formule qui me permet de regrouper les résultats de plusieurs lignes en fonction d'une recherche par nom
Réponses
9
Affichages
237
Sylvia57
S
G
  • Question Question
XL 2016 définir un fichier source en fonction d'une cellule
Réponses
3
Affichages
396
scraper
S
  • Résolu(e)
XL 2016 En VBA, Automatiser la réponse en fonction de l'état d'une cellule.
Réponses
7
Affichages
229
piga25
A
  • Question Question
XL 2016 Récupérer la valeur d'une cellule en fonction de 2 conditions
Réponses
6
Affichages
282
Ariellab
A
E
  • Résolu(e)
Microsoft 365 Ajouter dans TS en fonction valeur de cellule
Réponses
8
Affichages
415
vgendron
P
  • Résolu(e)
XL pour MAC Problème de changement de couleur de la valeur d'une cellule
Réponses
2
Affichages
446
pvander
P
  • Question Question
Autres Remplacer une zone de texte par un nom du gestionnaire de noms
Réponses
13
Affichages
845
Salmander
V
  • Résolu(e)
Microsoft 365 Barre de recherche : comment rendre éditable le résultat ?
2 3 4
Réponses
52
Affichages
925
dysorthographie
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…