Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel 1 Enregistrement sur trois liignes

1 Enregistrement sur trois liignes

3 réponses
Avatar
Dante Huapaya
Bonjour,
J’aimerais exporter ma feuille sur un fichier texte, mais chaque
enregistrement
il faut que soit sur trois lignes, voici les détails :

Sur ma feuille les données sont disposées comme ca:
IC, Carlos, Dante, 9999 ma rue, DC, phone, Email, MC, Montant1, Montant2
IC, Marie, Lacroix, 1111 ca rue, DC, phone, Email, MC, Montant1, Montant2

Sur mon fichier texte, il faut que l’enregistrement soit disposé comme ceci :

IC, Carlos, Dante, 9999 ma rue
DC, Phone, Email
MC, montant1, montant2
IC, Marie, Lacroix, 1111 ca rue
DC, phone, Email
MC, Montant1, Montant2

Merci de vos idées

Carlos Dante
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Daniel.C
Bonsoir.
Essaie :

Sub Export()
Dim Enrgt As String, c As Range
Open "e:donneesdanieltoto.txt" For Output As #1
For Each c In Range("A1", Range("A65536").End(xlUp))
tablo = Split(c, ",")
For i = 0 To 3
If Enrgt = "" Then
Enrgt = tablo(i)
Else
Enrgt = Enrgt & "," & tablo(i)
End If
Next i
Print #1, Enrgt
Enrgt = ""
For i = 4 To 6
If Enrgt = "" Then
Enrgt = tablo(i)
Else
Enrgt = Enrgt & "," & tablo(i)
End If
Next i
Print #1, Enrgt
Enrgt = ""
For i = 7 To 9
If Enrgt = "" Then
Enrgt = tablo(i)
Else
Enrgt = Enrgt & "," & tablo(i)
End If
Next i
Print #1, Enrgt
Next c
Close #1
End Sub

Cordialement.
Daniel
"Dante Huapaya" a écrit dans le
message de news:
Bonjour,
J'aimerais exporter ma feuille sur un fichier texte, mais chaque
enregistrement
il faut que soit sur trois lignes, voici les détails :

Sur ma feuille les données sont disposées comme ca:
IC, Carlos, Dante, 9999 ma rue, DC, phone, Email, MC, Montant1, Montant2
IC, Marie, Lacroix, 1111 ca rue, DC, phone, Email, MC, Montant1, Montant2

Sur mon fichier texte, il faut que l'enregistrement soit disposé comme
ceci :

IC, Carlos, Dante, 9999 ma rue
DC, Phone, Email
MC, montant1, montant2
IC, Marie, Lacroix, 1111 ca rue
DC, phone, Email
MC, Montant1, Montant2

Merci de vos idées

Carlos Dante



Avatar
JB
Bonsoir,

http://cjoint.com/?ktu1O6zUMk

JB
http://boisgontierjacques.free.fr

On 19 oct, 20:25, Dante Huapaya
wrote:
Bonjour,
J'aimerais exporter ma feuille sur un fichier texte, mais chaque
enregistrement
il faut que soit sur trois lignes, voici les détails :

Sur ma feuille les données sont disposées comme ca:
IC, Carlos, Dante, 9999 ma rue, DC, phone, Email, MC, Montant1, Montant2
IC, Marie, Lacroix, 1111 ca rue, DC, phone, Email, MC, Montant1, Montant2

Sur mon fichier texte, il faut que l'enregistrement soit disposé comme ceci :

IC, Carlos, Dante, 9999 ma rue
DC, Phone, Email
MC, montant1, montant2
IC, Marie, Lacroix, 1111 ca rue
DC, phone, Email
MC, Montant1, Montant2

Merci de vos idées

Carlos Dante


Avatar
Dante Huapaya
Merci beaucoup JB et Daniel

ca m'aide enormement.

Bonne fin de semaine

Carlos Dante


Bonsoir,

http://cjoint.com/?ktu1O6zUMk

JB
http://boisgontierjacques.free.fr

On 19 oct, 20:25, Dante Huapaya
wrote:
Bonjour,
J'aimerais exporter ma feuille sur un fichier texte, mais chaque
enregistrement
il faut que soit sur trois lignes, voici les détails :

Sur ma feuille les données sont disposées comme ca:
IC, Carlos, Dante, 9999 ma rue, DC, phone, Email, MC, Montant1, Montant2
IC, Marie, Lacroix, 1111 ca rue, DC, phone, Email, MC, Montant1, Montant2

Sur mon fichier texte, il faut que l'enregistrement soit disposé comme ceci :

IC, Carlos, Dante, 9999 ma rue
DC, Phone, Email
MC, montant1, montant2
IC, Marie, Lacroix, 1111 ca rue
DC, phone, Email
MC, Montant1, Montant2

Merci de vos idées

Carlos Dante