How do you trim all text before special characters

[Guest_imported]

Say that I have a string that reads:
"lastname, firstname - company"

How would I trim all the text behind the comma such that it would no read:
"lastname,"

 

[onpnt]

try this
Dim MyString, MyArray, Msg
MyString = "lastname, firstname - company"

MyArray = Split(MyString, ",", -1, 1)

Msg = MyArray(0)
MsgBox Msg
I may not get it the 1st or 2nd time,
but how sweet that 15th time can be.
admin@onpntwebdesigns.com