Menu

Sauvegarder sous + chemin ? [Résolu/Fermé]

JeanPedre 5 Messages postés mardi 14 février 2017Date d'inscription 15 février 2017 Dernière intervention - 14 févr. 2017 à 14:00 - Dernière réponse : ccm81 8337 Messages postés lundi 18 octobre 2010Date d'inscription 23 avril 2018 Dernière intervention
- 14 févr. 2017 à 15:51
Bonjour,

J'ai créé une procédure sur Excel avec des boutons permettant de passer à l'étape suivante.

Pour la sauvegarder j'ai mis dans mon module VBA du bouton de la première page la formule :
ActiveWorkbook.SaveAs Filename:=[Feuil1!F12].Value & ".xls" qui me permet de "sauvegarder sous" mon fichier avec le nom de la cellule F12 de ma feuille 1.
Mais voilà, impossible de trouver comment y ajouter un chemin pour que ma sauvegarde se trouve dans le bon fichier.
Mon chemin est : C:\Users\sat-dbe\Documents\François stagiaire\Procédures Excel (et oui je suis en stage)
Une idée pour y arriver ?

Merci d'avance
Afficher la suite 

5 réponses

ccm81 8337 Messages postés lundi 18 octobre 2010Date d'inscription 23 avril 2018 Dernière intervention - 14 févr. 2017 à 14:11
0
Utile
1
Bonjour

Const chenim = "D:\"

Public Sub ok()
Dim nomfic As String
nomfic = chenim & [Feuil1!F12].Value & ".xls"
ActiveWorkbook.SaveAs Filename:=nomfic
End Sub

Cdlmnt
JeanPedre 5 Messages postés mardi 14 février 2017Date d'inscription 15 février 2017 Dernière intervention - 14 févr. 2017 à 14:47
Bonjour CCM81,

Merci pour ta réponse mais elle ne marche pas.
Excel me renvoi le message d'erreur suivant : "Attendu : numéro de ligne ou étiquette ou instruction ou fin d'instruction"
ccm81 8337 Messages postés lundi 18 octobre 2010Date d'inscription 23 avril 2018 Dernière intervention - 14 févr. 2017 à 14:57
0
Utile
1
Je t'ai mis le code dans une procedure independante
' à toi de modifier le "chemin" du fichier but
et tu remplaces dans ton module
ActiveWorkbook.SaveAs Filename:=[Feuil1!F12].Value & ".xls"
par
chemin= "D:\"
nomfic = chemin & [Feuil1!F12].Value & ".xls"
ActiveWorkbook.SaveAs Filename:=nomfic

Si toujours erreur, que vaut la variable nomfic ?

Cdlmnt
JeanPedre 5 Messages postés mardi 14 février 2017Date d'inscription 15 février 2017 Dernière intervention - 14 févr. 2017 à 15:41
Ah d'accord je n'avais pas compris !
Tout marche à merveille maintenant :)
Merci beaucoup
ccm81 8337 Messages postés lundi 18 octobre 2010Date d'inscription 23 avril 2018 Dernière intervention - 14 févr. 2017 à 15:51
0
Utile
De rien,

Si c'est fini, peux tu mettre le sujet à résolu (en dessous du titre de ton premier message)

Cdlmnt