Petit soucis avec manipulation fichier + chaine de caractères - VB - VB/VBA/VBS - Programmation
Marsh Posté le 23-04-2004 à 12:43:46
hum, kan tu les ecris, mets
print #1, "10100101000" & " " & deuxiemeLigne |
si tu fais deja
print #1, "10100101000" |
voila, jespere tavoir aidé
Marsh Posté le 23-04-2004 à 14:40:55
Oui mais non car le tout est dans une variable donc j'affiche tout d'un coup.
Voilà en gros mon code :
|
La variable ou est contenu ce que j'écris par la suite est Li. Voilà
Marsh Posté le 23-04-2004 à 15:08:45
Dim strTemp as string
For v = 0 To UBound(Li)
If (Left(LTrim(Li(v)), 3) = "101" ) Then
If (Left(LTrim(Li(v)), 5) = "10101" ) Then
strTemp = LTrim(Li(v))
ElseIf (Left(LTrim(Li(v)), 5) = "10102" ) Then
Print #2, strTemp & " " & LTrim(Li(v))
End If
End If
Next
Et ça, ça marcherait ?
Marsh Posté le 23-04-2004 à 11:42:50
Voilà j'ai un petit souci. Ca ne m'a pas l'air ultra compliqué mais pourtant je n'y arrive pas...
En fait j'obtient ça dans un fichier:
10101011100070 PERFUSION, DIFFUSEUR
101020100000000000AO00000
Et j'aimerai obtenir ça:
10101011100070 PERFUSION, DIFFUSEUR 101020100000000000AO00000
Don réunir les deux lignes (mon fichier contenant énormément de lignes)
Merci d'avance
Message édité par waterbro le 23-04-2004 à 11:54:12