Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս ստեղծել Excel- ում աշխատաթերթերի անվանումների դինամիկ ցուցակ:

Եթե ​​աշխատանքային գրքում ունեք մի քանի թերթ, և աշխատանքային գրքում ցանկանում եք ստեղծել բոլոր թերթերի անունների դինամիկ ցուցակ, ապա ինչպե՞ս կարող եք դա անել: Այժմ այս ձեռնարկը ներկայացնում է որոշ հնարքներ ՝ Excel- ում այս առաքելությունն արագ ավարտելու համար:

Ստեղծեք աշխատաթերթի անվանումների դինամիկ ցուցակ `Սահմանեք անունով և բանաձևով

Ստեղծեք աշխատաթերթերի անունների դինամիկ ցուցակ VBA կոդով

Excel- ի համար Kutools- ի հետ ստեղծեք աշխատաթերթերի անվանումների դինամիկ ցուցակ լավ գաղափար 3

Excel- ի համար Kutools- ով ցուցադրեք աշխատաթերթերի անվանումների դինամիկ ցուցակ լավ գաղափար 3


1. Դատարկ թերթիկի մեջ ընտրեք բջիջ, այստեղ ես ընտրում եմ A1- ը, ապա կտտացնում եմ Բանաձեւեր > Սահմանեք անունը, տե՛ս սքրինշոթը.
doc- դինամիկ-աշխատաթերթ-ցուցակ-1

2. Հետո Նոր անուն երկխոսություն, տիպ Թերթ մեջ Անուն տեքստային տուփ (կարող եք փոխել ըստ անհրաժեշտության) և մուտքագրել այս բանաձևը = ՓՈՓՈԽՈՒԹՅՈՒՆ (GET.WORKBOOK (1), "[" "& GET.WORKBOOK (16) &"] "" ",")) մեջ է հղում դեպի տեքստային տուփ: Տեսեք,
doc- դինամիկ-աշխատաթերթ-ցուցակ-2

3: սեղմեք OK, Անցեք ընտրված բջիջը (A1) և մուտքագրեք այս բանաձևը = INDEX (թերթեր, ROWS ($ A $ 1: $ A1)) (A1- ն այն բանաձևն է, որը մուտքագրում եք այս բանաձևը, «Թերթերը» այն քայլն է, որը դուք սահմանել եք Քայլ 2-ում) մեջը, ապա քաշեք ինքնալրացման բռնիչը ներքև մինչև # REF! հայտնվում է.
doc- դինամիկ-աշխատաթերթ-ցուցակ-3

ԱկնարկԵթե ​​աշխատաթերթերը հանված կամ ավելացված են, դուք պետք է գնաք A1 և սեղմեք Enter ստեղնը, ապա նորից կտորացրեք ինքնալրացման բռնիչը:
doc- դինամիկ-աշխատաթերթ-ցուցակ-4


Եթե ​​ցանկանում եք ստեղծել աշխատաթերթի անվանումների դինամիկ ցուցակ, որոնք կարող են կապվել յուրաքանչյուր թերթի հետ, կարող եք օգտագործել VBA կոդ:

1. Ստեղծեք նոր աշխատանքային թերթ և անվանափոխեք այն որպես Ինդեքս: Տեսեք,

doc- դինամիկ-աշխատաթերթ-ցուցակ-5       doc- դինամիկ-աշխատաթերթ-ցուցակ-6

2. Աջ սեղմեք Ինդեքսի թերթիկի անվան վրա, ընտրեք Դիտել կոդը համատեքստային ընտրացանկից: Տեսեք,
doc- դինամիկ-աշխատաթերթ-ցուցակ-7

3. Բացվող պատուհանում պատճենեք և տեղադրեք ներքևում գտնվող VBA կոդը:

VBA. Ստեղծեք աշխատաթերթի անունների դինամիկ ցուցակ:

Private Sub Worksheet_Activate()
	'Updateby20150305
	Dim xSheet As Worksheet
	Dim xRow As Integer
	Dim calcState As Long
	Dim scrUpdateState As Long
	Application.ScreenUpdating = False
	xRow                       = 1
	With Me
		.Columns(1).ClearContents
		.Cells(1, 1) = "INDEX"
		.Cells(1, 1).Name = "Index"
	End With
	For Each xSheet In Application.Worksheets
		If xSheet.Name <> Me.Name Then
			xRow                     = xRow + 1
			With xSheet
				.Range("A1").Name = "Start_" & xSheet.Index
				.Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _
				SubAddress:             = "Index", TextToDisplay: = "Back to Index"
			End With
			Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _
			SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name
		End If
	Next
	Application.ScreenUpdating = True
End Sub

4: սեղմեք Վազում or F5 VBA- ն գործարկելու համար այժմ ստեղծվում է աշխատաթերթերի անունների դինամիկ ցուցակ:
doc- դինամիկ-աշխատաթերթ-ցուցակ-8

Ձեր պատասխանը ուղարկված չէ:

1. Երբ աշխատանքային գրքի աշխատանքային թերթը ջնջվում կամ տեղադրվում է, աշխատաթերթի անունների ցանկը ավտոմատ կերպով փոխվում է:

2. Թերթիկ անցնելու համար կարող եք կտտացնել անունների ցուցակի թերթիկի անվան վրա:

Եթե ​​վերը նշված երկու մեթոդները բավարար չափով համոզիչ չեն, եթե դուք հետաքրքրված եք նոր օգտակարությամբ, կարող եք անցնել հաջորդ երկու մեթոդների, որոնք կարող են այս գործն ավելի դյուրին դարձնել:


 Եթե ​​ցանկանում եք արագորեն թվարկել աշխատանքային գրքի բոլոր աշխատաթերթերի անունները և դրանք կապել բնօրինակ թերթերի հետ, կարող եք օգտագործել Excel- ի համար նախատեսված գործիքներ'S Ստեղծեք թերթիկների անունների ցուցակ.

Excel- ի համար նախատեսված գործիքներ, ավելի քան 300 հարմար գործառույթներ, ավելի հեշտացնում է ձեր գործերը: 

Այն բանից հետո անվճար տեղադրում Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝

1: սեղմեք Kutools Plus > Աշխատանքային թերթիկ > Ստեղծեք թերթիկների անունների ցուցակ, Տեսեք,

փաստաթղթի դինամիկ աշխատաթերթ

2. Մեջ Ստեղծեք թերթիկների անունների ցուցակ երկխոսություն.

 փաստաթղթերի դինամիկ աշխատաթերթերի ցուցակ 2
(1) Ստուգեք ինդեքսի ոճը, որն անհրաժեշտ է ձեզ Թերթի ինդեքսի ոճերը Բաժին;
(2) Անվանեք նոր ինդեքսի թերթիկը ՝ մուտքագրելով տվյալները Նշեք թերթի ինդեքսի թերթիկի անունը տեքստային տուփ;
(3) Նշեք գտնվելու վայրը, որի մեջ կտեղադրեք ավելացված ինդեքսի թերթիկը Տեղադրեք թերթի ինդեքսը մեջ ցուցակ;
(4) Եթե ցանկանում եք թերթի անունները մեկ ցուցակում ցուցադրել, ապա ընտրեք 1 սյունակը Etուցադրելով թերթի ինդեքսը մեջ ցուցակը:

3: սեղմեք Ok, Այժմ դուք կարող եք տեսնել, թե ինչպես են նշված թերթիկների անունները:
doc kutools- ը ստեղծում է թերթերի ցանկ 3

Հուշում.

1. Կարող եք կտտացնել թերթիկի անունը ՝ արագ անցնելու համար իր սկզբնական թերթին:

2. listանկը կամ թերթի անունները չեն կարող դինամիկորեն փոխվել թերթերը տեղադրելով կամ ջնջելով:

3. Իրականում, կարող եք նաև ստեղծել կոճակի ցուցակ ՝ հարաբերական թերթիկը կապելու համար, պարզապես անհրաժեշտ է ստուգել Պարունակում է կոճակներ և մակրոներ երկխոսության մեջ: տեսեք նկարը
doc kutools- ը ստեղծում է թերթերի ցանկ 4

Սեղմեք այստեղ ՝ թերթերի անունների ստեղծման ցուցակի մասին ավելին իմանալու համար:


Եթե ​​դու Excel- ի համար նախատեսված գործիքներ, Դուք կարող եք նաև օգտագործել այն նավարկություն օգտակար էջ ՝ պատուհանում կապելու ենթակա աշխատանքային թերթի անունները

Այն բանից հետո անվճար տեղադրում Excel- ի համար նախատեսված գործիքներ, խնդրում ենք վարվել ինչպես ստորև ՝

1: սեղմեք Կուտոլս > նավարկություն: Սեղմեք Աշխատանքային տետր և թերթ ցույց տալու աշխատանքային գիրքը և աշխատանքային թերթը, և կարող ես ընտրել աշխատանքային գիրք, այնուհետև դրա աշխատանքային թերթերը կցուցադրվեն նավարկություն պատուհան Տեսեք,
doc նավիգացիոն վահանակ 1   

Ձեր պատասխանը ուղարկված չէ:

Երբ աշխատաթերթերը ջնջված կամ ավելացված են, կարող եք կտտացնել թարմացնել կոճակը doc նավիգացիոն վահանակ 2 է Նավիգացիաn վահանակ ՝ աշխատանքային թերթի անունները թարմացնելու համար:

Նավիգացիայի մասին լրացուցիչ տեղեկություններ ստանալու համար կտտացրեք այստեղ:

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖 Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Նկարագրություն


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
Comments (13)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hallo. hoe zou ik dit kunnen doen om hetzelfde te doen maar met een welbepaade cel van verschillende werkbladen. Bv. een leeg tabblad. mijn andere werkbladen hebben allemaal dezelfde lay-out, maar in iedere cel een andere tekst. Nu zou ik graag in mijn leeg tabblad in Cel A1 de gegevens terugvinden van tabblad1 cel B3. Maar dan zou ik graag in Cel A2 de gegevens terugvinden van tabblad 2 cel 3. En zou naar beneden en dit in een beweging. We kunnen allemaal afzonderlijk doen, maar als er 500 werkbladen zijn, is dit onmogelijk.

Merci voor den input.
This comment was minimized by the moderator on the site
Hi, I guess you want to list all same cells across multiple sheets, if so, there are two tutorials may help you. Please visit:
How to reference same cell from multiple worksheets in Excel?
How to create a list from same cells across multiple sheets in Excel?
Hope it is helpful.
This comment was minimized by the moderator on the site
Em português brasileiro, GET.WORKBOOK é identificado como uma função no Gerenciador de Nomes para criar o nome "Sheets", mas ao referenciar "Sheets" numa célula, aparece o erro "#NOME?". Tentei várias vezes, inclusive com a sugestão de traduzir GET.WORKBOOK para OBTER.LIVRO mas não funcionou.
This comment was minimized by the moderator on the site
Hi, try this: =SUBSTITUIR(INFO.PASTA.TRABALHO(1),"["&INFO.PASTA.TRABALHO(16)&"]","")
This comment was minimized by the moderator on the site
Thanks for this helpful info. I created a dynamic list with VBA code in the Index tab. I found that it only updates when I click back to the Index tab, though. Is there a way to ensure it auto updates as soon as a new tab is created? I refer to the tab names elsewhere in the workbook and others will be using it so I'm trying to make it seamless. Thank you!
This comment was minimized by the moderator on the site
Sorry, I do not find that code can finish your job.
This comment was minimized by the moderator on the site
Or you can simply rightClick either the left or right tab-horizontal-scroll arrow at the bottomLeft, and then click the worksheet name (from the simple vertical list) that you want to jump to.
This comment was minimized by the moderator on the site
Just what I needed and worked perfectly. Thank you!
This comment was minimized by the moderator on the site
Defining the name "Sheets" in the define name DOES NOT WORK. The "refers to" box will not save the formula as typed and converts it to a text string.
This comment was minimized by the moderator on the site
how can I use this code to create the list of worksheets in horizontal order instead of vertical? is it possible?
This comment was minimized by the moderator on the site
Thank you. It is very useful. :D
This comment was minimized by the moderator on the site
How can i remove the links to each sheets and how to not include the "sheet1" and "Index" sheet? Private Sub Worksheet_Activate() 'Updateby20150305 Dim xSheet As Worksheet Dim xRow As Integer Dim calcState As Long Dim scrUpdateState As Long Application.ScreenUpdating = False xRow = 1 With Me .Columns(1).ClearContents .Cells(1, 1) = "INDEX" .Cells(1, 1).Name = "Index" End With For Each xSheet In Application.Worksheets If xSheet.Name Me.Name Then xRow = xRow + 1 With xSheet .Range("A1").Name = "Start_" & xSheet.Index .Hyperlinks.Add anchor: = .Range("A1"), Address: = "", _ SubAddress: = "Index", TextToDisplay: = "Back to Index" End With Me.Hyperlinks.Add anchor: = Me.Cells(xRow, 1), Address: = "", _ SubAddress: = "Start_" & xSheet.Index, TextToDisplay: = xSheet.Name End If Next Application.ScreenUpdating = True End Sub
This comment was minimized by the moderator on the site
How would I go about editing this code to include a checkbox to the left of the link that I could use to hide rows on a cover sheet? Also how could I insert a row on the worksheets below A1 to have the return to index link show up there?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations