Discussion :

[arctica]

bonjour à tous

J'ai écris une macro qui importe un fichier txt en excel A lheure actuel il se nomme donc globale .txt
le chemin pour le trouver est "T:\STATUS\Statuts 2010\globale.txt"
Ce que je voudrais c'est l'enregistrer en format xlsx, et lui donner le nom de "Benelux"
J'ai essayé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Application.GetSaveAsFilename ("T:\STATUS\Statuts 2010\globale & nom .xlsx", FileFormat:=xlExce52)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveWorkbook.SaveAs Filename:="T:\STATUS\Statuts 2010\globale", FileFormat:=xlExce51

ou

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim Chemin As String, NomFichier As String
 
             Chemin = "T:\STATUS\Statuts 2010\globale.txt"
             NomFichier = "Benelux.xlsx"
             ThisWorkbook.SaveAs "T:\STATUS\Statuts 2010\globale.txt\NomFichier, [FileFormat:=xlExce52]

rien à faire la methode save as de l'objet worbook a echoué
bref débutant je craque pourriez vous m'aider ?

[Chipss]

hmm essaye ca,n cela devrait marcher!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
MyPath="T:\STATUS\Statuts 2010\"
Name MyPath & "global.txt" as MyPath & "Benelux.xlsx"

ca devrait te faire la conversion! Par contre je sais pas du tout ce que le passage du .txt au forme excel va donner...

Chipss

[fring]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim Chemin As String, NomFichier As String
 
             Chemin = "T:\STATUS\Statuts 2010\globale.txt"
             NomFichier = "Benelux.xlsx"
             ThisWorkbook.SaveAs "T:\STATUS\Statuts 2010\globale.txt\NomFichier, [FileFormat:=xlExce52]

dans le Chemin, "globale.txt" est en trop

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Dim Chemin As String, NomFichier As String
 
             Chemin = "T:\STATUS\Statuts 2010\"
             NomFichier = "Benelux.xlsx"
             ThisWorkbook.SaveAs Chemin & NomFichier

[aalex_38]

Bonjour à tous,


Si ton fichier d'origine est un fichier text tu ne peux pas seulement le renommer pour le voir dans excel, essais de la faire sans programmation, ça ne marche pas, soit tu l'ouvre en utilisant la méthode OpenText, soit tu l'ouvres avec INPUT