I need a macro to change my sheet name.

When i open my workbook it allways have a different sheet name everyday(the
sheet names are not constant) so i need to change it to as i require (change
to Rec), i my workbook i will have only one sheet.