Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Intersect Method
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! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Intersect Method
if cell1 and cell2 both refer to single cells, unless they are the same
cell, there is no intersect. Intersect refers to a cell or cells that are contained within two or more ranges. Maybe you could better explain what you arte trying to do. -- HTH Bob Phillips (replace somewhere in email address with gmail if mailing direct) "Arne Hegefors" wrote in message ... 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! |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Intersect Method
Arne Hegefors wrote: 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! You have dimensioned cell1 and cell2 as ranges so you should be using Set, and not using .Address... Set cell1 = segment.Offset(0, m) Set cell2 = segment.Offset(i, 0) Then for isect it should be... Set isect = Application.Intersect(cell1,cell2) Ken Johnson |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Intersect Method
Hi Arne,
Without knowing more : Maybe you need to use something like Application.Intersect(Range("cell1").entireRow, Range("cell2").entireColumn) ? Regards JY "Arne Hegefors" wrote in message ... 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! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Intersect | Excel Programming | |||
Intersect | Excel Programming | |||
Method 'Intersect' of object '_Global' failed | Excel Programming | |||
Exception when uisng Intersect method | Excel Programming | |||
Is there a "Non-Intersect" VBA method to remove a sub-range from a range? | Excel Programming |