Splitting a Cell (no useable delimiter).....

Hi,

Say I have a sheet with column A as a list of peoples names, only there is no space or comma etc, though use of capitals is correct eg:

FredBloggs
JasonGass
SteveKyte

etc etc etc.

Is it possible to use VB, or a function to split the name into firstname in say column B and surname in Column C?

Thinking of in some way pulling it out using the 2nd uppercase letter, but not sure how?

Thanks
Neil

You are a star sir Thanks very much