One way:

Befo=ActiveSheet.Index

In article ,
John wrote:

What code do I execute to find the Worksheet number associated with the
currently selected worksheet? I have a macro that creates a new worksheet
before sheet1 by copying a template sheet using:
Sheets(ProjectSummaryTemplateSheetName).Copy Befo=Sheets(1)
I'd like to place it right before the selected worksheet.