Ag ceapadh, tá leabhar oibre agat le bileoga oibre iolracha, anois is mian leat na hainmneacha bileoga go léir a liostáil sa leabhar oibre reatha, an bhfuil aon mhodh gasta ann chun liosta d’ainmneacha na mbileog tráchtais seo a chruthú in Excel gan iad a chlóscríobh ceann ar cheann? Tá an rang teagaisc seo ag tabhairt treoracha maidir le conas ainmneacha bileog oibre a liostáil in Excel.

Faigh liosta d’ainmneacha uile na mbileog oibre ó leabhar oibre go dinimiciúil le foirmlí

Faigh liosta d’ainmneacha uile na mbileog oibre ó leabhar oibre le gné úsáideach

Faigh liosta d’ainmneacha uile na mbileog oibre ó leabhar oibre le cód VBA

Faigh liosta d’ainmneacha uile na mbileog oibre ó leabhar oibre go dinimiciúil le foirmlí

In Excel, is féidir leat ainm raon a shainiú, agus foirmle a chur i bhfeidhm ansin chun gach ainm bileog ón leabhar oibre reatha a liostáil, déan na céimeanna seo a leanas le do thoil:

1. Téigh chun cliceáil Foirmle > Bainisteoir Ainm, féach ar an scáileán:

2. Sa an Bainisteoir Ainm dialóg, cliceáil Nua cnaipe, féach ar an scáileán:

3. Sa popped amach Ainm Nua dialóg, sonraigh ainm isteach sa Ainm bosca téacs, agus ansin cóipeáil an fhoirmle thíos sa Tagraíonn bosca téacs, féach an pictiúr:

=GET.WORKBOOK(1)&T(NOW())

4. Ansin cliceáil OK > Dún chun na boscaí dialóige a dhúnadh, anois, téigh chuig bileog inar mian leat ainmneacha na mbileog go léir a liostáil, agus ansin an fhoirmle seo a leanas a iontráil i gcill bhán:

=IFERROR(INDEX(MID(Sheetnames,FIND("]",Sheetnames)+1,255),ROWS($A$2:A2)),"")

nótaí: San fhoirmle thuas, Ainmneacha bileoga an t-ainm raon a bhfuil tú suaite i gcéim 3.

5. Agus ansin tarraing an láimhseáil líonta síos go dtí na cealla nuair a thaispeántar cealla bána, agus anois, tá gach ainm bileog den leabhar oibre reatha liostaithe mar atá thíos an pictiúr a thaispeántar:

6. Más mian leat an hipearnasc a chruthú do gach bileog, bain úsáid as an bhfoirmle thíos:

=HYPERLINK("#'"&A2&"'!A1","Go To Sheet")

nótaí: San fhoirmle thuas, A2 an cill ina bhfuil ainm na bileoige, agus A1 an cill inar mian leat an chill ghníomhach a lonnú. Mar shampla, má chliceálann tú an téacs hipearnasc, aimsíonn sé cill A1 an bhileog.

7. Anois, nuair a chliceálann tú an téacs hipearnasc, tabharfaidh sé chuig an mbileog sin tú, féach thíos an taispeántas:

Faigh liosta d’ainmneacha uile na mbileog oibre ó leabhar oibre le gné úsáideach

Leis an Cruthaigh Liosta Ainmneacha Bileog fóntais an bhreiseáin tríú páirtí Kutools le haghaidh Excel, tá tú in ann liosta d’ainmneacha na mbileog oibre a chruthú i gcliceáil amháin, agus nasc a dhéanamh le gach bileog oibre le hipearnasc.

Tar éis a shuiteáil Kutools le haghaidh Excel, déan mar seo le do thoil:

1. cliceáil Kutools Plus > Bileog Oibre > Cruthaigh Liosta Ainmneacha Bileog, féach ar an scáileán:

2. Sa an Cruthaigh Liosta Ainmneacha Bileog bosca dialóige, sonraigh na socruithe seo a leanas le do thoil:

(1.) Roghnaigh stíleanna innéacs bileog is maith leat, is féidir leat ainmneacha na mbileog oibre a chruthú le hipearnasc nó le macra-cnaipí. (2.) Iontráil ainmneacha na mbileog oibre le haghaidh innéacs na mbileog. (3.) Sonraigh suíomh innéacs na mbileog oibre. (4.) Sonraigh cé mhéad colún is mian leat a úsáid sa bhileog oibre nua chun ainmneacha na mbileog oibre a thaispeáint.

3. Tar éis na socruithe a chríochnú, ansin cliceáil OK. Liostáladh ainmneacha na mbileog oibre go léir le naisc i mbileog oibre nua den leabhar oibre reatha. Féach an pictiúr:

ainmneacha bileog oibre le hipearnasc	ainmneacha bileog oibre le macra-cnaipí

Faigh liosta d’ainmneacha uile na mbileog oibre ó leabhar oibre le cód VBA

1. Coinnigh síos an ALT + F11 eochracha, agus osclaíonn sé an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an macra seo a leanas sa Modúil Fuinneog.

VBA: Liostaigh gach ainm bileog oibre le hipearnasc i mbileog oibre nua:

Sub CreateIndex()
'updateby Extendoffice
    Dim xAlerts As Boolean
    Dim I  As Long
    Dim xShtIndex As Worksheet
    Dim xSht As Variant
    xAlerts = Application.DisplayAlerts
    Application.DisplayAlerts = False
    On Error Resume Next
    Sheets("Index").Delete
    On Error GoTo 0
    Set xShtIndex = Sheets.Add(Sheets(1))
    xShtIndex.Name = "Index"
    I = 1
    Cells(1, 1).Value = "INDEX"
    For Each xSht In ThisWorkbook.Sheets
        If xSht.Name <> "Index" Then
            I = I + 1
            xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
        End If
    Next
    Application.DisplayAlerts = xAlerts
End Sub

3. Brúigh an F5 eochair chun an macra seo a rith. Anois tá na hainmneacha bileoga oibre go léir sa leabhar oibre gníomhach liostaithe i mbileog oibre nua ar a dtugtar Innéacs, agus tá ainmneacha na mbileog nasctha le gach bileog freisin, féach screenshot:

Earraí gaolmhara