Pull date from cell with text also

[Jason]

I have a cell ("A30") on a temporary sheet that contains:
Release Date: 7/30/2009
I want to pull the date from this cell.
I've looked at the Right function but the problem is that the date can
obviously grow or shrink because it is apparently in the m/d/yyyy format.
I've also looked at Find but cant seem to get the right syntax.

Any suggestions would be greatly appreciated!

 

[Mike H]

Hi,

Maybe this

=DATEVALUE(TRIM(MID(A30,FIND(":",A30)+1,255)))

Mike

 

[Mike H]

Hi,

I forgot I was in the 'programming' group

mydate = DateValue(Trim(Mid(Range("A30"), WorksheetFunction.Find(":",
Range("A30")) + 1, 255)))

Mike

 

[Rick Rothstein]

Will your text part *always* be "Release Date: "? If so,

=MID(A30,15,10)

 

[Ron de Bruin]

With the text/Date in A1 you can use something like this

=MID(A1,FIND(":",A1,1)+1,255)

 

[Rick Rothstein]

Or, in VB code...

DateAtEndOfText = Mid(Range("A30").Value, 15)

 

[Jason]

Thanks!

The VB codes from Mike and Rick both did the trick, as did Ron's once I
converted it to VB. The different solutions definitely helped me in general,
since I am still a newbie!