Excel Macro help

I need to create a macro to rename a worksheet. I need this macro to work on any worksheet. The problem I am having is that in VB it just selects the name of old worksheet and renames it to whatever I call it. If I run this on another spreadsheet, it doesn’t work becuase the name of the worksheet is not sheet1. It will never be named the same.

Is there a way to write a macro that takes the active sheet and renames it or a way I can tell it “The first sheet”?

Thanks,

Nicole