asked on
Dim ws As Worksheet: Set ws = Worksheets("MySheet")
Dim CCC As Range
Set CCC = Range(Cells(1, 1), Cells(1, 7)) ' Seems OK
Set CCC = Range(ws.Cells(1, 1), ws.Cells(1, 7)) ' Computer gets angry