Call in the Cavalry - 2017

Array issue
https://www.excelforum.com/excel-pro...ect-field.html

OP loops through array, the 8th column always comes up before the 9th column

 ElseIf .Range("T" & i) = "O" Then
            Set rng = Union(.Cells(i, 66), .Cells(i, 3), .Cells(i, 9), .Cells(i, 8), .Cells(i, 13), .Cells(i, 16), .Cells(i, 17))
            n = rng.Cells.Count
            ReDim Arr(1 To n)
            n = 1
            For Each cell In rng.Cells
            MsgBox cell.Address
                Arr(n) = cell.Value
                n = n + 1
            Next cell