VBA to return string between two spaces (first occurrence)

[seaottr]

Hi all,

I'm trying to use VBA to extract a string between two spaces.

Cell G3 = "Period: 2016-1-26 To 2016-12-26"

I want to return the first date in cell G3 (2016-1-26)

The problem is that the date isn't always the same length because the months and days don't include leading zeros.

Any help would be appreciated! Thanks in advance!

 

[steve the fish]

This would do that:

=TRIM(MID(SUBSTITUTE(G3," ",REPT(" ",LEN(G3))),LEN(G3),LEN(G3)))

 

[MickG]

Try:=

FstDate = Split(range("G3").value, " " ) (1)

 

[seaottr]

Thanks steve the fish, but I'm looking for VBA to do this

 

[seaottr]

Hi MickG...Unfortunately that didn't work. It returns nothing.

Try:=

FstDate = Split(range("G3").value, " " ) (1)

 

[seaottr]

Ah, I needed (2) instead of (1)! Thank you for your help!!!

 

[MickG]

You're welcome