View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
1scant[_2_] 1scant[_2_] is offline
external usenet poster
 
Posts: 1
Default Split text like line wrap into multi columns


Thanks for all the really quick replies. I have been trying the
following, and it works pretty good. When I start it at 40 and the 40th
character is the last (non-blank) character of a word, it puts that word
into the next line. So, I think I can start at 41. If the 41st
character is blank, then I can delete that character so the the second
line starts with a non-blank (if that is the case).

Function SplitAt(inTxt)
SplitAt = InStrRev(inTxt, " ", 41)
End Function


Agin, thx so much for the help.


--
1scant
------------------------------------------------------------------------
1scant's Profile: http://www.excelforum.com/member.php...o&userid=31635
View this thread: http://www.excelforum.com/showthread...hreadid=513277