May be not the best solution but it should work.
When you add a new sheet, create an input box where you
will specify the name of newly created sheet.
and then proceed with your code.

good luck

-----Original Message-----
Hello,

I have a workbook with a number of predefined worksheets.
I have a VBA code that formats, manipulates and analyses
data in these worksheets. I create a new worksheet and
copy raw data to it then name the worksheet based on a
value in cell B1. The data is then manipulated. I then
copy a data block from this newly created worksheet to
another prenamed worksheet. My question is how do I get
back to the new worksheet since the name varies. Here is
what I have to create the new worksheet:

'insert new worksheet and copies data to it

Range("A1:K24").Select
Selection.Cut
Sheets.Add
ActiveSheet.Paste
ActiveSheet.move After:=Sheets("Database")

'column width for data block
Columns("A:K").Select
Selection.Columns.AutoFit

'name worksheet
Dim LkName

LkName = Range("B1")

ActiveSheet.Name = LkName

End Sub


Thanks

.