AutoFilter Multiple Sheets, Copy, New Book, Paste to Multiple Sheets

  • Right, I've edited the file so that all my sheets start at A1 and the column to be filtered is at column G for all sheets. But I'm still getting the 'subscript out of range' error and it points to this code when I debug.

    Code
    1. wb.SaveAs Filename:=Output_Folder_Path & "_" & collection_UniqueList.Item(instance) & ".xlsx", FileFormat:=51
  • - I've removed the error handling in the second sub and the error is occurring in the collection sub to create the unique list - On your comment here, could you share the amended code?


    I am still getting the error for the SaveAs code and have checked through, can't seem to figure out what is causing the issue.

  • What it currently looks like