View Single Post
  #13   Report Post  
Posted to microsoft.public.excel.programming
GS[_6_] GS[_6_] is offline
external usenet poster
 
Posts: 1,182
Default Iterate through all words

vText = Split(FilterString(ReadTextFile(sFile), " "), " ")

Still not right! Should be...

vText = Split(FilterString(Replace(ReadTextFile(sFile), vbCrLf, " "), "
"), " ")

...so the last/first word of each line doesn't get concatenated!

--
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion