Move cursor to specific cell in other worksheet

I put a value in "Sheet1" cell "J2". On running the macro I want cursor to move to "Sheet2" Column "B" and row number as per value put in "Sheet1" cell "J2". Please suggest vba code for the same. Thanx

1 Answer

Sub moveToCell() Dim intRow As Integer intRow = Sheet1.Range("J2").Value Sheet2.Activate Sheet2.Range("B" & intRow).Select
End Sub