Here's my code

Range("A10").Select
ActiveCell.Offset(NStreets + 3, 19).Select

'SHADING HEADING RED

Set Myrange = Range("*ActiveCell.location*:"
Range("*ActiveCell.location*").Offset(0, 5).Address)
With Selection.Interior
.ColorIndex = 9
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
End With

I need to get to row X but X is based on "A10" + NStreets (unkown rows
+ 3. Where I've set the text as bold I need place what X is based o
because I don't have a starting cell. Instead of a starting cell
need to input A10 + NStreets + 3.

Help...

--
VB
-----------------------------------------------------------------------
VBA's Profile: http://www.excelforum.com/member.php...fo&userid=1649
View this thread: http://www.excelforum.com/showthread.php?threadid=27878