Bonjour à tous,
Voila, le client m'a donné un fichier XLS avec des données pour inserer dans une base de donnée en PHP, j'ai donc besoin d'exporter tout ça dans un fichier CSV...
Le problème c'est que dans certains champs il a utilisé le retour à la ligne (\n)
... hors.. dans mon script, un retour à la ligne signifie "nouvelle ligne";
j'aimerai donc retirer ces retours à la ligne dans le fichier XLS
en fouillant sur le web j'ai trouvé ça :
Code :
- Sub quelcaractere()
- Dim old_text As String
- Dim new_text As String
- For i = 2 To 15444
-
- If Range("AD" & i).Value <> "" Then
- old_text = Range("AD" & i).Value
- new_text = Replace(old_text, Chr(10), " - " )
- new_text = Replace(new_text, Chr(13), " - " )
- new_text = Replace(new_text, " ", " " )
- Range("AC" & i).Value = new_text
- End If
- Next
- End Sub
|
.. le probleme c'est que j'y connais pas grand chose en VB... pour vous dire je sais même pas ou je devrais coller ce bout de code dans Excel !!
Help me pleeease !!
Freed
