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
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
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
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" <DanteHuapaya@discussions.microsoft.com> a écrit dans le
message de news: C5616510-7CF8-4D12-B061-8899F32B2EA0@microsoft.com...
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
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
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
Bonsoir,
http://cjoint.com/?ktu1O6zUMk
JB
http://boisgontierjacques.free.fr
On 19 oct, 20:25, Dante Huapaya
<DanteHuap...@discussions.microsoft.com> 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
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
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
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
<DanteHuap...@discussions.microsoft.com> 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
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