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

Besoin d'aide sur une mcro enregistrée

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

bellic

XLDnaute Junior
Bonjour le forum,

Voila je travail sur un classeur excel me permettant d'enregistrer a partir de ce classeur des nouveaux classeurs.
Cependant j'utilise ce classeur sur plusieurs pc différents, et donc le chemin d'accès (répertoire) est variable pour l'enregistrement.
Ainsi je souhaiterais qu'a l'ouverture de ce classeur, il me demande le répertoire soit dans ou je veux l'enregistrer, et que cette variable soit présent dans ma macro enregistrer.
Ci joint ma macro enregistrée :
sub enregistreement()
reponse = InputBox("Nom du projet")

If reponse = False Then
Exit Sub
ElseIf reponse = "" Then
Exit Sub
Else
ChDir "C:\Users\Bellic\Desktop\projet"
ActiveWorkbook.SaveAs Filename:= _
"C:\Users\Bellic\Desktop\projet\" & reponse & ".xlsm", FileFormat:= _
xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
End If

End Sub

Merci,
Cdt,
 
Trier par date Trier par votes
Re : Besoin d'aide sur une mcro enregistrée

Bonjour,

essaye ceci :
Code: 
Dim chemin As String, reponse As String
With Application.FileDialog(msoFileDialogFolderPicker)
    .Show
    If .SelectedItems.Count > 0 Then chemin = .SelectedItems(1)
End With
ThisWorkbook.SaveAs chemin & "\" & reponse, FileFormat:=xlOpenXMLWorkbookMacroEnabled

bon après midi
@+
 
Vote positif 0 Vote négatif
Re : Besoin d'aide sur une mcro enregistrée

Bonjour Pierre93
Je vois pas trop comment marche la macro envoyée,
en faite j'aimerai que lorsque j'ouvre le classeur, un inputbox ou autre apparait, ou l'on inscrit le chemin voulu (ex,C:\Users\Bellic\Desktop\projet\, et que ce chemin se mette dans mon début de macro envoyée.
J'espère avoir été assez clair,
Merci de ton aide
 
Vote positif 0 Vote négatif
Re : Besoin d'aide sur une mcro enregistrée

Re,

dans le code proposé, une boite de dialogue est affichée, te permettant de choisir un dossier.... une fois selectionner ce dossier et son emplacement sont utilisés lors de l'enregistrement.... permet à ce que le chemin, s'il est renseigné soit valide, pas d'erreur de saisie... Sinon utilise une "inputbox" comme utilisé pour le nom du fichier...
 
Vote positif 0 Vote négatif
Re : Besoin d'aide sur une mcro enregistrée

Re,
ok sa marche, mais je voulais avoir la possibilité de taper moi même le chemin d'accès.
En revanche c'est sur que cela évite des erreurs de saisi ton code.
Merci de ton aide,

Cdt
 
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

L
  • Question Question
XL 2016 Enregistrer une zone dans un PDF
Réponses
2
Affichages
297
patricktoulon
F
  • Question Question
Microsoft 365 Problème avec VBA ( Résolu)
Réponses
2
Affichages
494
firecarl
F
M
  • Question Question
XL 2019 La méthode select de la classe range a échoué
Réponses
4
Affichages
277
job75
  • Question Question
XL 2021 Exportation module, erreur après déprotection
2
Réponses
20
Affichages
1 K
Dranreb
S
  • Résolu(e)
XL 2016 Coller nom classeur sur plage cellules
Réponses
9
Affichages
531
safranien
S
  • Résolu(e)
XL 2013 customui copymemory qui fait encore des siennes
Réponses
8
Affichages
332
Rheeem
R
V
  • Question Question
XL 2016 transformer en boucle une macro créer avec l'enregistreur automatique
Réponses
3
Affichages
175
vazvaz
V
B
  • Résolu(e)
Microsoft 365 Besoin d'aide pour faire fonctionner 2 codes VBA ensemble
Réponses
2
Affichages
429
BenExcel
B
Z
  • Question Question
XL 2021 VBA Prélèvement d'une donnée si une valeur recherchée est identique
Réponses
3
Affichages
578
ZiM
Z
XLS : Evènements souris 'click' sur la grille & astuces
Réponses
3
Affichages
422
Lu76Fer
A
  • Résolu(e)
XL 2021 Céer un fichier (.text) avec VBA pour enregistrer les évènements dans un journal
Réponses
4
Affichages
700
arnoldbrice19
A
G
  • Question Question
Microsoft 365 Avoir des classeurs maitres et les procédures dans un autre classeur.
2
Réponses
19
Affichages
2 K
GClaire
G
  • Résolu(e)
XL 2019 Organiser les données dans listbox
Réponses
2
Affichages
1 K
Messan
I
  • Question Question
XL 2016 Mon code VBA me renvoi une erreur
Réponses
6
Affichages
843
INFINITY100
I
  • Résolu(e)
XL 2010 Problème màj feuilles depuis fichiers CSV
2
Réponses
23
Affichages
3 K
cathodique
  • Résolu(e)
XL 2019 Aide pour un module d'archivage de feuille en pdf dans répertoire
Réponses
5
Affichages
991
Nico2978
H
  • Question Question
Microsoft 365 Besoin aide : Erreur code macro . Problème est résolu
Réponses
7
Affichages
1 K
heart clean
H
  • Question Question
XL 2021 Comment créer un code VBA afin de création un chemin d'accès universel
Réponses
8
Affichages
1 K
AugusteP
J
  • Résolu(e)
XL 2021 Envoi d'email et PJ en VBA
Réponses
3
Affichages
728
JPaul78
J
A
  • Question Question
XL 2019 Variable du bureau dans l'envoie par Outlook Filename:= et .Attachments.Add
Réponses
11
Affichages
805
fanch55
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…