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

enregistrement nom fichier et nom cellule

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

hydr

XLDnaute Nouveau
Bonjour,

J'ai un problème d'enregistrement de fichiers... je sais plus comment faire.
J'ai un fichier de données auquel j'applique un traitement. Une fois que c'est fait j'aimerais enregistrer ma feuille active dans un autre dossier que le dossier initial et avec pour nom de fichier celui du fichier initial + celui de la cellule B1 (le tout en txt).
j'ai essayé de faire un truc qui donne ça:

Dim chemin As String, fichier As String
chemin = "C:\Documents and Settings\QUIER\Bureau\Stage M2\Résultats\Fluo 2008\Données brutes + traitement eau MilliQ\Données brutes"
fichier = "NomClasseur_" & Range("B1") & ".txt"

ChDrive "C"
ChDir "C:\Documents and Settings\QUIER\Bureau\Stage M2\Résultats\Fluo 2008\Données brutes + traitement eau MilliQ\Données txt"
ActiveSheet.SaveAs Filename:=fichier

mais bon ça ne fonctionne pas... Est-ce que quelqu'un peut m'aider (c'est assez urgent...) merciiiii
 
Re : enregistrement nom fichier et nom cellule

Bonjour

Vous ne pouvez pas enregistrer une feuille directement.

Il faut creer un nouveau classeur
Copier la feuille dedans
Enregristrer en .txt

Vous pouvez remplacer les ChDir par le chemin complet dans le nom du fichier du SaveAs


Bonne continuation

Olivier
 
Re : enregistrement nom fichier et nom cellule

merci de ta réponse!
malgré tes conseils, ma commande SaveAs ne fonctionne toujours pas... je n'arrive vraiment pas à voir où est le problème...
du coup j'ai essayé autrement avec

nom= ActiveWorkbook.Name

je copie et colle ce dont j'ai besoin dans un nouveau classeur et après je lui dit de m'enregistrer ce nouveau fichier comme ça:

ChDrive "C"
ChDir "C:\Documents and Settings\QUIER\Bureau\Stage M2\Résultats\Fluo 2008\Données brutes + traitement eau MilliQ\Données txt"
ActiveWorkbook.SaveAs Filename:= nom & "\" & Range("B1") & ".txt"

Mais non toujours pas!!! peut-être que le nom ne va pas renvoyer au fichier précédent d'ailleurs. je désespère là... j'ai vraiment besoin de cette macro pour traiter mes données sinon je sais pas comment je vais m'en sortir...
 
Re : enregistrement nom fichier et nom cellule

Bonsoir

Le format pour un fichier texte est celui-ci :

ActiveWorkbook.SaveAs Filename:="C:\test.txt", FileFormat:=xlText


Cordialement
Olivier
 
- 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
20
Affichages
3 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…