You can use the Replace function. The code below should do it
Dim NewData As String
Dim Data As String
Open txtfilename for Input As #1
Open txtfilename.new for Append As #2
Do Until EOF(1)
Line Input #1, Data
Newdata = replace(Data," ", Chr(34))
Print #2, Newdata
Loop
Close #1
Close #2
msgbox "completed"
What are you supposed to do if there are consecutive spaces? e.g If I have three spaces in a row between two "words" do you replace them with Three Tabs or with One Tab?
_________________________________
In theory, there is no difference between theory and practice. In practice, there is. [attributed to Yogi Berra]
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.