vba to find cell in a column based on the value in another cell

[cjcass]

Hi,
Am after some vba if poss. to achieve the following:
In cell B2 in a wksheet named 'Report' I have a dropdown list. When I select a new entry from this list in B2 I would like some vba that goes to Column J in a wksheet named 'Data' and finds and selects the cell which has the same value I have selected in B2 in the 'Report' wksheet. There will be an exact match somewhere in Col J in 'Data'.
Any help much appreciated, thanks.

 

[ajamess]

Make this code on the sheet when there is a change:

Sub FindValue()
dim row as long

row = application.worksheetfunction.match(range("B2").value, Worksheets("Data").Range("j:j"),0)
Worksheets("Data").activate
Range("J" & row").value

End sub

 

[cjcass]

Hi,
Thanks for coming back, it doesn't seem to like the syntax in the last row:
Range("J" & row").value

 

[ajamess]

oops sorry, typo on my part:

Range("J" & row).value

 

[cjcass]

ok, had to change the last bit to as follows:
Range("J" & row).Select
and it now works, thanks for your help

 

[ajamess]

Ugh. Its early and I'm waiting on slow code to run.

Sorry about that! Glad you got it working.