I use windownsXP and excel 2002.
I have 10 sheet in my excel file. now i stay in cell "a1 sheet 1" and sheet
10 cell a10 is active cell. I want to jump from cell a1 sheet 1 to active
cell in sheet 10

(ex. jump to sheet 2 cell a2 = press F5 -- key sheet 2!a2 -- enter
jump to active cell in sheet 10 = ?

thank you in advance

--
mai

Hi Mai,
I'm not sure I follow your question.
If you want A1 to be the active cell when Sheet1 is activated, A2 to be
the active cell when Sheet2 is activated, A3 to be the active cell when
Sheet3 is activated, A4 to be the active cell when Sheet4 is activated
etc up to Sheet10, where the active cell upon activation will be A10;
then one way is to paste this code into the ThisWorkbook code module:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Range("A" & Right(Me.ActiveSheet.Name, Len(Me.ActiveSheet.Name) -
5)).Select
End Sub

To get the code into the ThisWorkbook code module..
1. Copy the above code.
2. Right click any of the worksheet tabs to view the contextual menu.
3. Select View code from the contextual menu
4. If the Project Explorer is not visible then go ViewProject Explorer
5. Double click the ThisWorkbook icon to open that code module
6. Paste the code into the blank module.
7. Press Alt + F11 to exit the VBA Editor

Hi Mai,

Use this version of the code which has a line break so that it pastes
correctly into the code module.

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Range("A" & Right(Me.ActiveSheet.Name, _
Len(Me.ActiveSheet.Name) - 5)).Select
End Sub

Ken Johnson

You could put this formula in cell A1 of Sheet 1:

=HYPERLINK(#'Sheet 10'!A10,"jump")

Note that there is an apostrophe after the # and before the !. This
will put the word "jump" in cell A1 and when you click this it will
take you to cell A10 of Sheet 10.

Hope this helps.

Pete

Thank for you answer.
but I want to use press key F5 and jump to other sheet ...,active cell in
other sheet .....

--
mai


"Pete" เขียน:

You could put this formula in cell A1 of Sheet 1:

=HYPERLINK(#'Sheet 10'!A10,"jump")

Note that there is an apostrophe after the # and before the !. This
will put the word "jump" in cell A1 and when you click this it will
take you to cell A10 of Sheet 10.

Hope this helps.

Pete

Not possible using go to (F5)

--
Regards,

Peo Sjoblom

Portland, Oregon




"mongkolkorn" wrote in message
...
Thank for you answer.
but I want to use press key F5 and jump to other sheet ...,active cell in
other sheet .....

--
mai


"Pete" เขียน:

You could put this formula in cell A1 of Sheet 1:

=HYPERLINK(#'Sheet 10'!A10,"jump")

Note that there is an apostrophe after the # and before the !. This
will put the word "jump" in cell A1 and when you click this it will
take you to cell A10 of Sheet 10.

Hope this helps.

Pete

I tried using the suggestion: =HYPERLINK(#'Sheet 10'!A10,"jump")
But it doesn't seem to work.
All I want to do is to jump to a certain cell in another sheet (same
workbook) when I click on a cell which contains the formula. Somehow, I'm not
succeeding using hyperlink. what seems to be my problem?

"mongkolkorn" wrote:

Thank for you answer.
but I want to use press key F5 and jump to other sheet ...,active cell in
other sheet .....

--
mai


"Pete" เขียน:

You could put this formula in cell A1 of Sheet 1:

=HYPERLINK(#'Sheet 10'!A10,"jump")

Note that there is an apostrophe after the # and before the !. This
will put the word "jump" in cell A1 and when you click this it will
take you to cell A10 of Sheet 10.

Hope this helps.

Pete

Thank for you answer.
but I want to use press key F5 and jump to other sheet ...,active cell in
other sheet .....
--
mai


"Ken Johnson" เขียน:

Hi Mai,

Use this version of the code which has a line break so that it pastes
correctly into the code module.

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Range("A" & Right(Me.ActiveSheet.Name, _
Len(Me.ActiveSheet.Name) - 5)).Select
End Sub

Ken Johnson