Hi Josh,

Try something like:

Dim rng1 As Range, rng2 As Range, rng3 As Range

Set rng1 = Sheets("Sheet2").Range("A1")
Set rng2 = rng1(2)
Set rng3 = rng1(3)


---
Regards,
Norman



"Josh" wrote in message
...
in my program Cell 1 references a specific cell in another worksheet. In
my
program Cell 2 wants to reference the cell below the referenced cell in
Cell
1. i am using Cell 1 as my reference point so Cells 2, 3, 4, 5, 6, etc...
will reference the data/Rows below the Referenced cell in the other
worksheet.