Description:
This code snippet will split an amount of text at a word rather than a character.
desc = objRecordSet("P_Desc1") descfinal = left(desc, 130) Set regEx = New RegExp regEx.Global = true regEx.IgnoreCase = True regEx.Pattern = "(\b\w*$)"





