Thank you Anthony.
If I try
.SetRange Range(Cells(BrakeSheetPullRow, 2), Cells(BrakeSheetPullRow + 10, uCol))
I get error Type 11 "mismatch"
If I try
.SetRange =Range(Cells(BrakeSheetPullRow, 2), Cells(BrakeSheetPullRow + 10, uCol))
I get error 438 "Object doesn't support this property or method

;(