I have a single cell range named StartRange.
I would like to construct a multi-cell range named TestRange.
The first cell of TestRange would be StartRange and the last cell of
TestRange would be StartRange.Row + RowInteger, StartRange.Column +
ColumnInteger

Dim StartRange As Range
Dim TestRange As Range
Dim RowInteger As Integer
Dim ColumnInteger As Integer

Set StartRange ActiveCell
RowInteger = 4
ColumnInteger = 5

'Doesn't work
Set TestRange = Range(StartRange,
Range(StartRange).Item(RowInteger,ColumnInteger))

Please help
Thanks Jeff Higgins