I would like to extract some text in my WorkSheet Tab and enter it

I have 52 worksheets which are titled "Week Ending 12-4-05" and so on.

I would like to extract the date (text) and enter it as a date (number) in a
cell.

Is there a function or some code that can be entered to do this?

Darrell