The code is failing on the red marked line. Can someone please help me with it.
<code>
Private Sub Workbook_Open()
Dim WS1 As Worksheet
Dim WS2 As Worksheet
Set WS1 = Worksheets("Sheet1")
Set WS2 = Worksheets("Sheet2")
Dim testCollection As Collection
Dim SIZE As Integer, sortCol As Integer...