just refer to the the cell relative to the cell in the filterrange1
For Each rng In filteredrange1
If rng = "Value" Then
testvar = rng.offset(0,10)
msgbox testvar
End if
Next
change the 10 to reflect the offset from the filteredrange1 column.
--
Regards,
Tom Ogilvy
"zestpt " wrote in message
...
i have two filtered ranges that i'm going through that are in the same
worksheet. they are just different columns in the worksheet. i'm trying
to put this into code
if a value is found in filteredrange1 then goto the same row in
filteredrange2 and copy its value
right now i can go through filteredrange1 a row at a time, but i want
to go through both filteredranges the same row at the same time
this is the code that i'm using so far, which does not work because the
if the rows in filteredrange2 aren't together testvar will be some
hidden data that shouldn't be used
-----------------------------------
dim filteredrange1 as range
dim filteredrange2 as range
dim counter as integer
dim testvar as string
counter =0
'Traverse range and get value
For Each rng In filteredrange1
If rng = "Value" Then
testvar = filteredrange2(counter)
counter = counter + 1
msgbox testvar
Next rng
-------------------------------------
please help.
Thanks in advance
---
Message posted from http://www.ExcelForum.com/