I have a excel workbook in which there are 2 sheets
there are numbers in sheet 1 column A

what i want is that if i click the number in column A like A2, it find
that number in sheet 2 and take u there

something like a link

thank

--
Message posted from http://www.ExcelForum.com

Where in sheet 2 might the number be found? Always in column A? O
anywhere? Is there a pattern? - Piku

--
Message posted from http://www.ExcelForum.com

yes always in column

--
Message posted from http://www.ExcelForum.com

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target.Value < "" Then
x = 0
s2len = Worksheets(2).UsedRange.Row _
+ Worksheets(2).UsedRange.Rows.Count
Do
x = x + 1
Loop Until Worksheets(2).Cells(x, 1).Value = Target.Value
Application.Goto Worksheets(2).Cells(x, 1), 1
End If
End Sub - Pikus


---
Message posted from http://www.ExcelForum.com/

do we have a way other than this one??

like with excel formuls or something


thanks lot piku

--
Message posted from http://www.ExcelForum.com

vikram

=HYPERLINK(CELL("address",INDEX(Sheet2!$A$1:$A$100 0,MATCH(1,Sheet2!$A$1:$A$1
000,1))),1)

The 1's in MATCH(1, ....)),1)

is the number in the cell. The first one finds the row in sheet2 that
matches and the second one is the "friendly name" of the hyperlink.

--
Dick Kusleika
MVP - Excel
Excel Blog - Daily Dose of Excel
www.dicks-blog.com

"vikram " wrote in message
...
do we have a way other than this one??

like with excel formuls or something


thanks lot pikus


---
Message posted from http://www.ExcelForum.com/

What was s2Len supposed to be for - to keep it from looping until it runs
off the bottom if no match is found?

--
Regards,
Tom Ogilvy

"pikus " wrote in message
...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target.Value < "" Then
x = 0
s2len = Worksheets(2).UsedRange.Row _
+ Worksheets(2).UsedRange.Rows.Count
Do
x = x + 1
Loop Until Worksheets(2).Cells(x, 1).Value = Target.Value
Application.Goto Worksheets(2).Cells(x, 1), 1
End If
End Sub - Pikus


---
Message posted from http://www.ExcelForum.com/

I could not understand that macro!

Tom do u hv any idea? how to do what i want to d

--
Message posted from http://www.ExcelForum.com