Intersect method  
Author Message
AndersBank





PostPosted: Visual Basic for Applications (VBA), Intersect method Top

I am trying to use interset method to locate a cell and get the value from 
that cell. My cod now is:

Dim cell1 As Range
Dim cell2 As Range
cell1 = segment.Offset(0, m).Address
cell2 = segment.Offset(i, 0).Address
 Set isect = Application.Intersect(Range("cell1"), Range("cell2"))

and it does not work at all. I have to use the segment.Offset() somehow 
because I use that code to find other cells like this:

  Do Until segment.Offset(i, 0).Value = "Cash" Or i > 5000
         i = i + 1
      Loop

Please help me with this code! Thanks very much in advance!



Microsoft ISV Community Center Forums1