For cnt = 1 To Len(lineOfCSV$)
If ( Mid(
lineOfCSV$ , cnt, 1) = ";" ) Then
newLine =
newLine + "; "
Else
newLine =
newLine + Mid(
lineOfCSV$ , cnt, 1)
End If
Next
After that work with the newLine and don't forget to Trim empty spaces that you've just created.
Regards
Stephan