Pull date from cell with text also

J

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!
 
M

Mike H

Hi,

I forgot I was in the 'programming' group

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

Mike
 
R

Ron de Bruin

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

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

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!
 
Top