transformer un fichier excel en fichier txt

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : transformer un fichier excel en fichier txt

aculy

Bonjour,

tout d'abord bonnes fêtes de fin d'année

Voilà je viens vers vous pour un coup de main pour me faciliter la vie
j ai un fichier excel qui comporte entre 200 et 400 lignes sur 1 à 10000 colonnes

je dois transformer ce fichier excel en fichier txt en mettant le colonnes les une a la suite des autres.

pour le moment je le fais à la main en ouvrant mon fichier excel et mon fichier txt
et je copie les colonnes du fichier excel vers le txt

j aimerais bien le faire par macro si possible

Pourriez vous m'aider sur ce sujet

Cordialement
Alex

Publicité

woulf

Lurker intensif

bonjour, si j'ai bien compris ton besoin ce code devrait faire l'affaire :

Code :

Sub exporttotxt()
Dim maxligne As Integer
Dim maxcolones As Integer
maxlignes = CInt(InputBox("nombre de ligne?", "Nombre de ligne", "" ))
maxcolones = CInt(InputBox("nombre de colonnes?", "Nombre de colonnes", "" ))
myfile = InputBox("Chemin du fichier txt?", "Chemin du fichier txt", "c:\" )
fnum = FreeFile()
Open myfile For Output As fnum
For i = 1 To maxcolones
For j = 1 To maxlignes
Print #fnum, ActiveSheet.Cells(j, i).Value
Next j
Next i
Close #fnum
End Sub

aculy

j essai en début d apres midi
Merci

aculy

j ai une erreur sur cette ligne
Open myfile For Output As fnum

woulf

Lurker intensif

quelle erreur?
Est ce que tu a les droits sur le dossier que tu a spécifié?
Est ce que tu a demandé de créer le fichier a la racine de c:?

aculy

je suis le super administrateur de mon LAN
et oui j ai mis c: pour le mettre a la racine

mais je vais essayer un autre dossier

aculy

j ai meme essayer sur mon autre disk
pareil

woulf

Lurker intensif

met C:\Users\tonusername\Desktop\test.txt par exemple et ça devrait marcher, l’écriture a la racine du disque par un script ne lui plait pas(Pour des raisons de sécurité je pense).

aculy

Merci
ca fonctionne parfaitement
Bonne fin d'année

woulf

Lurker intensif

De rien,
Bonne année.

FORUM HardWare.fr

Programmation

VB/VBA/VBS

transformer un fichier excel en fichier txt

Sujets relatifs
Où se trouve le fichier de descripteur de déploiement ?	classeur excel / onglet excel
[Excel] tableau à "2 colonnes"	Macro excel
[RESOLU] Compression de fichier pst	Transformer une URL en une autre URL
Suppresion d'un bloc de ligne dans Excel	Faire une macro sur excel pour transformer Fichier Word
[VB] Transformer un fichier excel en un éxécutable	transformer un fichier excel en un .exe
Plus de sujets relatifs à : transformer un fichier excel en fichier txt

Page générée en 0.053 secondes