Thank you so much!
Here's what I ended up actually using:
With ActiveCell
For ii = 1 To rowCnt - 1
.Offset(rowCnt, ii).FormulaR1C1 = "=R[" & ii - rowCnt & "]C[" & -1 - i
& "] "
Next
End With
alla
--
Specto
-----------------------------------------------------------------------
Spector's Profile:
http://www.excelforum.com/member.php...fo&userid=1561
View this thread:
http://www.excelforum.com/showthread.php?threadid=27163