using text to column in VBA

Hi,

I have a text in a single cell that has spaces, commas, excalamations, question marks etc. I want to convert this text into columns using text to column feature of excel in my macro..

when i record text to column it does not give me a code that could be made dynamic..

Can any one please suggest me a better way to do that?

Regards,
Vaibhav