Lol!
Only a month & a half - if you get the bug, you could have years ahead of you. Not necessarily of "struggle" but definitely full of challenges. I've got a few years under my belt & I'm still learning
Here's a small addition to Stanley's code to include hyperlinks:
I got the hyperlink line of code by recording a macro of my actions when I manually created a hyperlink using [ctrl + K], and then I modified the recorded code to use the ShtName variable.![]()
Option Explicit Sub ListAllSheets() Dim i As Long Dim ShtName As String For i = 1 To Sheets.Count ShtName = Sheets(i).Name With ActiveSheet .Cells(i, "A").Value = ShtName 'or to add a link... .Hyperlinks.Add Anchor:=.Cells(i, "b"), Address:="", _ SubAddress:=ShtName & "!A1", TextToDisplay:=ShtName End With Next i End Sub
Stanley,
Nice list of links
hth
Rob
Bookmarks