1) why not use hyperlinks?

Option Explicit
Sub AddHyperlinks()
Dim cell As Range
For Each cell In Range("A6:A8")
cell.Hyperlinks.Add cell, "", SubAddress:=cell.Value & "!a1"
Next
End Sub

2) if you have sheet tabs showing, you can right click and select the sheet



"Jack Wood" wrote in message
...

I have a workbook consisting of about 20 tabs. In this workbook I have
a worksheet that is called Index & is an index of all the tabs. On this
index list, need a macro for when the item is selected you will be sent
directly to that sepcific worksheet. Then once at that specific
worksheet I have typed RTN TO INDEX & need a macro on that worksheet
when RTN TO INDEX is selected, will return you to the Index.


--
Jack Wood
------------------------------------------------------------------------
Jack Wood's Profile:
http://www.thecodecage.com/forumz/member.php?userid=346
View this thread:
http://www.thecodecage.com/forumz/sh...d.php?t=101234