is it wrong ti write the code like this?

Thanks.

Dim WB As Workbook
Dim WS As Worksheet
Dim BeginRow As Integer
Dim SearchRng As Range

Set SearchRng = Range(WB.WS.Cells(BeginRow, 4), WB.WS.Cells(BeginRow, 30))