extract space-separated words in a cell into an array

Originally Posted by kev_

By VBA, A2:A100 converted in a single line

Range("A2:A100").TextToColumns DataType:=xlDelimited, ConsecutiveDelimiter:=True, Space:=True

Thanks for the Reps

You're welcome

Looks like this puts the contents of the array into a row. Is it possible to use something similar to what you have and put it into a single column that is different than the original string's column? So for example, if original string is in cell F5, put the extracted elements into cells A1, A2, A3, A4 and so on?