Please use the below module
*Function SplitCaps(strIn As String) As String*
*Dim objRegex As Object*
*Set objRegex = CreateObject("vbscript.regexp")*
*With objRegex*
*.Global = True*
*.Pattern = "([a-z])([A-Z])"*
*SplitCaps = .Replace(strIn, "$1 $2")*
*End With*
*End Function*
and use
Thank you very much for your help
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles, like P