Test-To-Columns 256
 

Have you looked at the split function using the space character as the
delimiter?

Sub test()
Dim str As String
Dim ary() As String
Dim lng As Long

str = "this is a test"
ary = Split(str, " ")
For lng = LBound(ary) To UBound(ary)
MsgBox ary(lng)
Next lng
End Sub
--
HTH...

Jim Thomlinson


"Otto Moehrbach" wrote:

Excel XP & Win XP
With VBA, I need to break down large cell entries (more than 256 words)
into individual words. Text-To-Columns works only for 256 words because of
the 256 column limit in Excel XP. Is there a work-around to place the words
into a column rather than a row? Thanks for your time. Otto
PS: My objective is to have VBA work with each individual word. Is there
another way for VBA to capture each individual word?