Hi Dave, thanks for the help.
I just came up with this:

Dim r As Integer
Dim c As Integer
r = Range("BJ3").Value
c = Range("BJ4").Value
Range("C4").Select
Range(Selection, ActiveCell.Offset(r - 1, c - 1)).Select

but I think I will go with what you gave me...thanks again!

Regards

Jean-Guy


--
pinmaster
------------------------------------------------------------------------
pinmaster's Profile: http://www.excelforum.com/member.php...fo&userid=6261
View this thread: http://www.excelforum.com/showthread...hreadid=515148