I know that code can be written to reference sheets
according to their position in the Workbook, e.g.:

Sheets("abc").Copy Befo=Sheets(6)

The sheet that is in position 6 is called "End" but it
moves position as you copy more sheets into the file! So,
I need some code to be able to locate the numerical
position of the "End" sheet and put the variable back into
the 'copy' code above.

Any ideas anyone?!

Thanks,
James

Try
sheets("End")

"James Weaver" wrote in message
...
I know that code can be written to reference sheets
according to their position in the Workbook, e.g.:

Sheets("abc").Copy Befo=Sheets(6)

The sheet that is in position 6 is called "End" but it
moves position as you copy more sheets into the file! So,
I need some code to be able to locate the numerical
position of the "End" sheet and put the variable back into
the 'copy' code above.

Any ideas anyone?!

Thanks,
James

Is this what you're trying to do?

Sheets("abc").Copy Befo=Sheets(Sheets.Count)

HTH
Paul
--------------------------------------------------------------------------------------------------------------
Be advised to back up your WorkBook before attempting to make changes.
--------------------------------------------------------------------------------------------------------------

I know that code can be written to reference sheets
according to their position in the Workbook, e.g.:

Sheets("abc").Copy Befo=Sheets(6)

The sheet that is in position 6 is called "End" but it
moves position as you copy more sheets into the file! So,
I need some code to be able to locate the numerical
position of the "End" sheet and put the variable back into
the 'copy' code above.

Any ideas anyone?!

Thanks,
James