Существует Range1, имеющий 100 столбцов и 1000 строк (одна цельная область)
Как определить Range2 , который включает только 40 столбцов от Range1?

Использовать буквенную адресацию не хотелось бы.

пока приходит на ум только
Set rep_range = ActiveWorkbook.Sheets("report").Range("REPORT_ZONE")

Set text_zone = rep_range.Range("A1:N" & CStr(rep_range.Rows.Count))
Set number_zone = rep_range.Range("N1:CB" & CStr(rep_range.Rows.Count))

Хотелось бы уйти от буквенной адресации

Shocker.Pro,
спасибо!
запутался в трех соснах - ошибочно писал Range(Cells(i,j),Cells(k,l))

только получается нужно еще явно прописать книгу и лист.
Я думал, из родительского range это будет определено
Спасибо