Note: The other languages of the website are Google-translated. Back to English
Մուտք  \/ 
x
or
x
Գրանցում  \/ 
x

or

Excel- ում անվան փոխարեն ինչպե՞ս հղել աշխատանքային թերթը ըստ ինդեքսի համարի:

Excel- ի շատ օգտագործողների համար նրանք սովորաբար սովորեցնում են նախնական աշխատաթերթի անունը վերանվանել իրենց անհրաժեշտ մեկի: Բայց շատ դեպքերում նրանք պետք է վկայակոչեն աշխատանքային թերթը `ելնելով դրա ինդեքսի համարից, այլ ոչ թե իրական անունից: Ինչպե՞ս հասնել դրան: Դուք կարող եք փորձել մեթոդը հոդվածում:

Հղման աշխատանքային թերթը ըստ ցուցիչի համարի ՝ օգտագործողի կողմից սահմանված գործառույթով անվան փոխարեն

Հղման աշխատանքային թերթը ըստ ցուցիչի համարի ՝ օգտագործողի կողմից սահմանված գործառույթով անվան փոխարեն

Խնդրում ենք անել հետևյալը ՝ Excel- ում անվան փոխարեն նշեք աշխատանքային թերթը ըստ ինդեքսի համարի:

1. Մամուլ ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո պատճենեք և տեղադրեք ներքևի VBA կոդը Մոդուլի պատուհանում:

VBA կոդ. Տեղեկանքային թերթ ըստ ցուցիչի համարի Excel- ում

Function SHEETNAME(number As Long) As String
    SHEETNAME = Sheets(number).Name
End Function

3. Սեղմեք ալտ + Q ստեղները փակելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

Notes:

1. Եթե Ձեզ անհրաժեշտ է վկայակոչել որոշակի թերթի անուն `իր համարով, ընտրեք դատարկ բջիջ և մուտքագրեք բանաձև = SHEETNAME (1) անմիջապես բանաձևի բարում, ապա սեղմեք Enter ստեղնը: Տեսեք,

2. Եթե ցանկանում եք աշխատանքային էջից բջջային արժեք ստանալ `ելնելով դրա ինդեքսի համարից, խնդրում ենք օգտագործել այս բանաձևը:

=INDIRECT("'"&SHEETNAME(1) &"'!A1")

3. Եվ եթե ցանկանում եք որոշակի սյունակ կազմել աշխատաթերթում `ելնելով դրա ինդեքսի համարից, խնդրում ենք կիրառել այս բանաձևը:

=SUM(INDIRECT("'"&SHEETNAME(1) &"'!C2:C7"))

Առնչվող հոդվածներ:

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

Excel- ի համար նախատեսված Kutools- ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80% -ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր առանձնահատկություններ, Աջակցում է Office / Excel 2007-2019 և 365. Աջակցում է բոլոր լեզուները: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հատկություններ ՝ 30-օրյա անվճար փորձաշրջան: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

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

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50% -ով և նվազեցնում է ձեզ համար ամեն օր մկնիկի հարյուրավոր կտտոցներ:
officetab ներքևում
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Jork · 6 months ago
    If you use this UDF, I'd suggest Making two changes in bold below, with notes on why.

    Function SHEETNAME(number As Long) As String
    Application.Volatile <--------- this makes the function recalculate when you change the sheets name. Otherwise when you change the sheet name it doesn't change unless you perform a manual recalculation.----------
    SHEETNAME = Thisworkbook.Sheets(number).Name <------ If you use this function in multiple workbooks, it will only check names of the workbook the function is in. Otherwise this function will potentially call the tab names from other open Workbooks with this formula.-------
    End Function
  • To post as a guest, your comment is unpublished.
    Kjeld · 4 years ago
    Nice solution.
    Also, referencing cell B4 of the first sheet in another Excel file can be done like this:
    =INDIRECT("'[other_filename.xlsx]"&SHEETNAME(1) &"'!B4")

    However note that the file containing the VBA script needs to be stored as a macro file, .xlsm

    Cheers,