software

I want that in firs worksheet from a workbook to add links to all the sheets
that are in that workbook. Something like indexing of the workbook. Like a
site map.
So when i want to see the a specific sheet to navigate jusc clicking the
link that is having.See www.mvps.org/dmcritchie/excel/buildtoc.htm
--
HTH

Bob Phillips

(remove xxx from email address if mailing direct)

quot;Adrian Fickerquot; lt;Adrian gt; wrote in message
...
gt; I want that in firs worksheet from a workbook to add links to all the
sheets
gt; that are in that workbook. Something like indexing of the workbook. Like a
gt; site map.
gt; So when i want to see the a specific sheet to navigate jusc clicking the
gt; link that is having.
gt;
Adrian, have a look here for one way to do it,
www.mvps.org/dmcritchie/excel/buildtoc.htm

--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 amp; 2003

quot;Adrian Fickerquot; lt;Adrian gt; wrote in message
...
gt; I want that in firs worksheet from a workbook to add links to all the
sheets
gt; that are in that workbook. Something like indexing of the workbook. Like a
gt; site map.
gt; So when i want to see the a specific sheet to navigate jusc clicking the
gt; link that is having.
gt;

TrySub CreateIndex()
Dim intPlaceRow As Integer
Dim intSheetCounter As Integer

intPlaceRow = 1
For intSheetCounter = 1 To Worksheets.Count
ThisWorkbook.Worksheets(quot;Sheet4quot;).Cells(intPlaceRo w, 1) =
Worksheets(intSheetCounter).Name
Cells(intPlaceRow, 1).Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=quot;quot;,
SubAddress:=ThisWorkbook.Worksheets(quot;Sheet4quot;).Cell s(intPlaceRow,
1).Value amp; quot;!A1quot;,
TextToDisplay:=ThisWorkbook.Worksheets(quot;Sheet4quot;).C ells(intPlaceRow,
1).Value
intPlaceRow = intPlaceRow 1
Next
End Sub--
bgeier
------------------------------------------------------------------------
bgeier's Profile: www.excelforum.com/member.php...oamp;userid=12822
View this thread: www.excelforum.com/showthread...hreadid=542066