Bonjour,
Je télécharge un fichier csv A, ensuite je recopie une ligne de ce fichier à la fin d'un fichier csv B.
Et dans ce fichier csv B, les espaces sont convertis en ce caractère: � (dans notepad le caractère est un carré).
Voilà la partie du code:
Merci!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Sub Copie() monStreamReader = New StreamReader("C:\fichierA.csv") 'Stream pour la lecture Dim ligne As String Do ligne = monStreamReader.ReadLine If ligne <> "" And InStr(1, ligne, "performances", CompareMethod.Text) = 0 And InStr(1, ligne, "Instrument's", CompareMethod.Text) = 0 Then ligne = Replace(ligne, "�", " ") monStreamWriter.WriteLine(ligne) //fichierB End If Loop Until ligne Is Nothing monStreamReader.Close() End Sub
Partager