VBA - Return part of string

[AIMbe]

Hi everyone,
I'm hoping you could help me here..
I have a string from where I want to return the characters between the first " " (space) and the second:

e.g. 3_ECOB B15 5 PATAKS-PE/CLEAR - I'm trying to get B15.

I'm using a combination of left and instr but I'm not able to get to the result I need.

Thanks for your help!

 

[footoo]

Dim ray() As String, s$
ray = Split([A1], " ")
s = ray(1)

 

[pike]

Or maybe just

 dim strray as string
Strray=split([A1],” “)(1)