Value at Intersecting cells
If you in fact want the MIDPOINT between the cells, name them Range1 and
Range2 and adapt the following for a code solution:
Debug.Print Range("range1").Row, Range("range2").Row, _
Range("range1").Column, Range("range2").Column
Debug.Print Range("range1").Offset( _
(Range("range2").Row - Range("range1").Row) \ 2, _
(Range("range2").Column - Range("range1").Column) \ 2)
Note the integer division - you might be surprised when you see what
happens with normal division by 2 there :)
On Wed, 27 Aug 2003 08:46:12 -0400, "ibeetb" wrote:
Is there a way to get the value of a cell which lies at the intersection of
say......B8 and D8? (I'd prefer to do in code - but will accept doing it in
a wrksht function)
|