I am using Excel 2002. I need to capture the row number and then skip to
the next row and then capure that row number. Basically I have set a filter
on a column and then go to row 1. The next row may be 37 or 263 or
something like that. I need to skip to the next row and capture that
number.

How do I do that?

TIA
Glen

Glen.

Activecell.Row

will return the row number of the active cell.
You could pass that value to a memory variable for later use.

I'm thinking that maybe you have a filtered list?
If that's the case, you'll probably need to select the next
Visible row in a range?? That's a whole different story.

Try this code if it is a filtered list:

Dim nVisRow as Long
With ActiveCell
nVisRow = Range(.Offset(1), Cells(65536, .Column)) _
.SpecialCells(xlCellTypeVisible).Cells(1).Row
End With
Range("A" & nVisRow).Select

Post back with some more info if the above doesn't help..

John

"Glen Mettler" wrote in message
...
I am using Excel 2002. I need to capture the row number and then skip to
the next row and then capure that row number. Basically I have set a
filter
on a column and then go to row 1. The next row may be 37 or 263 or
something like that. I need to skip to the next row and capture that
number.

How do I do that?

TIA
Glen

John,
I do have a filtered list. This works like a champ!!
Thanks
Glen


"John Wilson" wrote in message
...
Glen.

Activecell.Row

will return the row number of the active cell.
You could pass that value to a memory variable for later use.

I'm thinking that maybe you have a filtered list?
If that's the case, you'll probably need to select the next
Visible row in a range?? That's a whole different story.

Try this code if it is a filtered list:

Dim nVisRow as Long
With ActiveCell
nVisRow = Range(.Offset(1), Cells(65536, .Column)) _
.SpecialCells(xlCellTypeVisible).Cells(1).Row
End With
Range("A" & nVisRow).Select

Post back with some more info if the above doesn't help..

John

"Glen Mettler" wrote in message
...
I am using Excel 2002. I need to capture the row number and then skip
to
the next row and then capure that row number. Basically I have set a
filter
on a column and then go to row 1. The next row may be 37 or 263 or
something like that. I need to skip to the next row and capture that
number.

How do I do that?

TIA
Glen

Glen,

Glad it worked.
Happy to have been a help.

John

"Glen Mettler" wrote in message
...
John,
I do have a filtered list. This works like a champ!!
Thanks
Glen


"John Wilson" wrote in message
...
Glen.

Activecell.Row

will return the row number of the active cell.
You could pass that value to a memory variable for later use.

I'm thinking that maybe you have a filtered list?
If that's the case, you'll probably need to select the next
Visible row in a range?? That's a whole different story.

Try this code if it is a filtered list:

Dim nVisRow as Long
With ActiveCell
nVisRow = Range(.Offset(1), Cells(65536, .Column)) _
.SpecialCells(xlCellTypeVisible).Cells(1).Row
End With
Range("A" & nVisRow).Select

Post back with some more info if the above doesn't help..

John

"Glen Mettler" wrote in message
...
I am using Excel 2002. I need to capture the row number and then skip
to
the next row and then capure that row number. Basically I have set a
filter
on a column and then go to row 1. The next row may be 37 or 263 or
something like that. I need to skip to the next row and capture that
number.

How do I do that?

TIA
Glen