Excel, Click on cell to go to specific worksheet

[ch4meleon]

I have 80 rows in a worksheet, I want to be able to click a specific cell in each row and for that to go to a specific worksheet. very grateful for any idea on how to do this

thanks in hope

 

[SkipVought]

Hi,

Hyperlink is a spreadsheet feature. Insert > Hyperlink ... Place in this document

Use your macro recorder, if you want code. Post back with your recorded code if you need help.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[ch4meleon]

no i dont want to open a document, i want to open another worksheet in the same document, hyperlink is not giving me that option ?

 

[SkipVought]

Yes it does! LOOK CAREFULLY!

Place in this document


Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[HarleyQuinn]

You need to change the Link To: selected item on the left to 'Place in This Document' (as per Skip's post)

Hope this helps

Andy
---------------------------------
[green]' Signature removed for testing purposes.[/green]

http://lessthandot.com

 

[ch4meleon]

Thanks both for your replies, does it make a difference if im using excel for mac ? I can hyperlink to a document rather than website and I can select the document I want (the one im in) but I cant then select a specific worksheet in that document ?

 

[SkipVought]

Don't know.

Personally, I would not go to the bother of inserting 80 hylerlinks OR coding anything.

Right-click any sheet navigation button in the lower l-h corner of the display, and you'll get a pop-up list of ALL SHEETS in the workbook.

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[ch4meleon]

thanks Skip, Im trying to make something for someone else to use while Im not here and they arent very familiar with computers so I was wanting to make it as quick and easy as possible for them.

No worries if you dont know a way to code it I'll see if I can send it to my pc and hyperlink it from there and email it back

thanks again for replying

 

[SkipVought]

You could also use the Worksheet_SeelctionChange event, assuming that each of the 80 cells has the sheet name and the column is A...

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Column > 1 Then Exit Sub
    If Target.Value = "" Then Exit Sub
    
    On Error GoTo EndIt
    
    Sheets(Target.Value).Activate
    
EndIt:
End Sub

Right-click the sheet tab and select View Code

Paste into the code window.


Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[ch4meleon]

Thanks Skip !!