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

Sauvegarder dans le bon dossier

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

scorplo77

Guest
Bonjour à tous, j’ai quelques notion sous Excel, mais très peu en VBA, et je dois réaliser pour mon frère qui se lance en auto-entrepreneur dans le terrassement, une feuille de calcul pour ses devis et factures.

Problème n°1, J’ai créé un bouton pour la sauvegarde sous le nom de 3 cellules à la suite, le problème c’est que le fichier s’enregistre dans mes documents et non pas dans le dossier de la société. Voici ma macro

Sub enregister()
Dim NOM As String
NOM = Range("N3")
ThisWorkbook.SaveAs (NOM)
End Sub


N3 est la combinaison de 3 cellules
Merci !!!
 
Re : Sauvegarder dans le bon dossier

Bonjour et bienvenu sur le forum Scorplo77,

Dans ta macro, tu n'indique pas enregistrer la macro.

Alors forcément Excel fait comme il peut 😉

Code:
ThisWorkbook.SaveAs "c\Société Tartanpion\Devis et facture 2010\Fichier 01 2011.xls"

Bref, comme tu peux le remarquer il faut indiquer le chemin exacte.

Bonne journée

Cordialement
 
Re : Sauvegarder dans le bon dossier

Merci beaucoup excel-lent, tu n'es pas si lent d'ailleurs.

Par contre je voudrais enregistrer que la feuille sous le nom de la cellule N3 et ce dans mes documents/ste toto (nom)

et quand je lui renseigne le chemin il me le met en rouge donc pas bon...
 
Re : Sauvegarder dans le bon dossier

Bonjour,

essaye comme suit :
Code:
ThisWorkbook.SaveAs "C:\MesDocuments\NomSociete\" & Range("N3").value" &  ".xls"

enregistre le classeur dans lequel se trouve la macro...

bon après midi
@+

Edition : tu peux peut être enlever l'extension xls... A voir sous 2010...
 
Dernière édition:
Re : Sauvegarder dans le bon dossier

Merci Pierrot93 tout fonctionne,

Par contre je voudrais enregistrer que la feuille en cours, pour pouvoir mettre un compteur sur la 2eme feuille de ma matrice qui ne sera pas enregistrer dans mes devis et factures.

mon module VBA est

Sub enregister()
Dim NOM As String
NOM = Range("N3")
ThisWorkbook.SaveAs "C:\MesDocuments\NomSociete\" & Range("N3").value"
End Sub


que dois -je changer?
Merci a vous tous !
 
Re : Sauvegarder dans le bon dossier

Donc dans ma macro je dois remplacer
ThisWorkbook.SaveAs PAR ActiveWorkbook.SaveAs ? ou je dois mettre ActiveSheet.Copy avant ?
 
Re : Sauvegarder dans le bon dossier

OK ça marche mais ma logique n'est pas bonne, car ceci ne prend pas les macros

mon but étant de pouvoir compter les devis lors de leur edition, pour cela j'ai mis sur la matrice un compteur et une sauvegarde auto après comptage.
Mais après qu'il soit enregistrer je voudrais pouvoir les modifier sans que le compteur ne continue.
Mon raisonnement était de mettre un compteur sur la feuille 2,
un rappel de contenu sur feuille 1
et d'enregistrer que celle ci.
mais les macro ne sont pas enregistrer.
 
Re : Sauvegarder dans le bon dossier

Re,

voir l'argument "fileformat" de la méthode "saveas", pas 2007 je ne peux te donner la bonne valeur... F1 dans l'éditeur vba quand curseur positionné sur "saveas" te donnera les valeurs possibles...
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

M
Réponses
2
Affichages
805
Mr.Adrien
M
Réponses
3
Affichages
879
Réponses
2
Affichages
995
Réponses
2
Affichages
738
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…