Code change from sheet name to Sheet number

Hi,
I have record a macro as

Please Login or Register  to view this content.

its work fine but I want change it from Sheet name to Sheet Number

ie: My Sheet number 4 and Sheet Name is "Costing".

Do you mean something like:

Please Login or Register  to view this content.

Hi TMS,

I want formula run with sheet number, so user can change sheet name.

Change the sheet reference by the sheet's CodeName
Something like

Please Login or Register  to view this content.

by

Please Login or Register  to view this content.

See in VBA Project Explorer the correspondance between sheet's name and Sheet' codename
Sheet's Codename is like Sheet1, Sheet2 etc..
Sheet's name is in parenthesis

Hi Fluff13,

Thanks a lot...it's work perfect what I want, Thanks again.