Getting a "RUNTIME ERROR 1004" "Method 'Worksheets' of object '_Global' failed" error that I'm not sure how to resolve?
It occurs early in the code at this point (highlights this line in yellow)

Worksheets("Sheet1").Copy After:=Worksheets("Sheet1")
SCENARIO:
The workbook arrives with a single sheet called "Sheet1" (this is a report that has a lot of garbage that the code will clean up)
The code first preserves that original report by:
1- creating a duplicate copy of it
2- renaming one of those sheets "Original Rpt"
3- places the new sheet to the left of that "Original Rpt" (preserved sheet)

Here's a snippet from the beginning of the code:
Sub CleanUp()
'
'
'TAKES THE ORIG FILE'S 'Sheet1' AND RENAMES IT TO "Original Rpt" (preserves it as is)
'NEXT, IT CREATES A TAB 'Stripped-Down MASTER' (which is the clean full list)
'This Stripped sheet needs dates converted before proper itemization by week can be performed
'Use Mod2 to convert dates then proceed to Mod 3 & 4


'CREATE COPY AND RENAME IT FOR FILTERING FURTHER TO ONLY inS
Worksheets("Sheet1").Copy After:=Worksheets("Sheet1")

'RENAME NEW COPIED ACTIVE SHEET
ActiveSheet.Name = "Original Rpt"

Sheets("Sheet1").Select

'THIS FIRST SUB GETS EVERYTHING PREPPED INTO COLS A"L
'REMOVES TOP ROWS AND LEAVES A SINGLE HEADER
'
' Macro3_StartSteps Macro
' select all cells unmerge and unwrap -- then size columns
' --then it deletes blank columns -- then deletes top rows 1-4
'

'
Sheets("Sheet1").Select

    Cells.Select
    With Selection
        .VerticalAlignment = xlTop
Hoping someone sees what's wrong?
Thank you