looks in first 100 row's in column A

Sub test()
x = ActiveCell.Value
Sheets("Sheet2").Activate
For r = 1 To 100
If Cells(r, 1) = x Then r1 = r
Next
Cells(r1, 1).Select
End Sub


"BorisS" skrev:

I need a piece of code to do the following (within a larger procedure):

1) take the "A" cell of the row that a user is on
2) find that value in another sheet ("sheet 2", let's call it)
3) position the cursor on the find

from there, I will have it take certain pieces of information and perform a
function.

Sounds like a simple request, but I've always been bad with taking values
that are not hard coded and using them in things like find. So if anyone can
help me with the few lines that it takes to do the above, as well as any
definitions (and where definitions are supposed to go, as I know about them,
but have never actually used them), I'd be most grateful for some help. Thx.
--
Boris