Extrach Letters from a String

[AFK1]

I have a string that looks like this

123!ThisLetter!344

I need to get the letter 'ThisLetter' or in other word letter between first! and last!, because the length of the middle letter can change.

Any idea of how to do that.
Thanks.

 

[gmmastros]

Dim strTest As String

strTest = "123!ThisLetter!344"

Msgbox Split(strTest, "!")(1)

Split will create an array of string for you. This array starts at 0, so the (1) element of the array will be what you are looking for.



-George

Strong and bitter words indicate a weak cause. - Fortune cookie wisdom

 

[AFK1]

Thanks...It worked..I got my value..
Great Day