Macro Error When Using Copy/Pasted Data

[FrenchCelt]

Hello,

I have a macro that works just fine when running on the original system generated Excel report from which I get the data. I then created a macro enabled template which requires copying all the data from the original worksheet and pasting onto the template. When I run the macro from the template, I get an error (Run-time error '9': Subscript out of range), and I get the same error if I simply copy the original data, paste onto a new worksheet, and run the original macro using the shortcut key. This leads me to think that something about copying and pasting the data is affecting the format, causing the macro to error out. Does anyone have any insight into this matter?

 

[Fluff]

That error suggest a problem with the name of a workbook or worksheet.

 

[FrenchCelt]

That error suggest a problem with the name of a workbook or worksheet.

That makes sense. This is the part of the code that errors out:

ActiveWorkbook.Worksheets("Page1_1").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Page1_1").AutoFilter.Sort.SortFields.Add Key:= _
        Range("C1:C15000"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption _
        :=xlSortNormal

I guess the "Page1_1" is the problem?

 

[Fluff]

Do you have a sheet with that name in the active workbook?

 

[FrenchCelt]

Do you have a sheet with that name in the active workbook?

That is the name of the system generated report. So I changed the name in the macro to the name of the workbook in the macro enabled template. It works correctly now. Thanks for pointing me in the right direction!

 

[Fluff]

Glad it's working & thanks for the feedback