Kā ātri izveidot katalogu savai Excel darbgrāmatai, izmantojot VBA

Kopīgot tūlīt:

Nepieciešams izveidot katalogu darbgrāmatai ar daudzām darblapām. Šeit mums ir ātra metode, kā izveidot katalogu Excel darblapā.

Mūsu iepriekšējā rakstā Kā izveidot Excel katalogu, izmantojot hipersaites, mēs esam runājuši par kataloga izveidošanu, darblapā ievietojot hipersaites. Var būt ļoti noderīgi izveidot katalogu darbgrāmatai ar daudzām darblapām. Hipersaišu pievienošana manuāli pa vienai var būt laikietilpīga. Tāpēc šeit ir jauna metode, kā ātri izveidot šādu katalogu.

Izveidojiet katalogu

Zemāk redzamajā attēlā darbgrāmatā ir daudz darblapu.Kataloga piemērs

Un tagad jūs varat izveidot katalogu šajā darbgrāmatā.

  1. Ar peles labo pogu noklikšķiniet uz vienas lentes cilnes.
  2. Pēc tam izvēlnē noklikšķiniet uz pogas “Pielāgot lenti”.Pielāgojiet lenti
  3. Logā “Excel opcijas” apgabalā “Galvenās cilnes” atzīmējiet opciju “Izstrādātājs”.
  4. Pēc tam noklikšķiniet uz Labi.Pārbaudiet izstrādātāju
  5. Tagad lentē noklikšķiniet uz cilnes “Izstrādātājs”.
  6. Pēc tam rīkjoslā noklikšķiniet uz pogas “Visual Basic”.Visual Basic

Tādējādi esat atvēris Visual Basic redaktoru. Lai ātri atvērtu redaktoru, varat arī nospiest tastatūras īsinājumtaustiņu “Alt + F11”.

  1. Tagad ar peles labo pogu noklikšķiniet VBA projektorā.
  2. Pēc tam pārvietojiet kursoru uz opcijas “Ievietot”.
  3. Apakšizvēlnē izvēlieties opciju “Modulis”.Ievietojiet moduli

Tādēļ projektā esat ievietojis jaunu moduli.

  1. Tagad kopējiet šādus VBA kodus jaunajā modulī:

Apakšizveidošanas izvēlne ()

    Aptumšot kā veselu skaitli

    a = 1

    'pievienot jaunu darblapu

    Darblapas. Pievienojiet pirms: = Lapas (1)

    Izklājlapas (1) .Name = “Izvēlne”

    Darblapas (“Izvēlne”). Diapazons (“A1”). Vērtība = “Izvēlne”

    Par = 2 uz ActiveWorkbook.Worksheets.Count

        Darblapas (“Izvēlne”). Diapazons (“A” un a) = Izklājlapas (a). Nosaukums

        ActiveSheet.Hyperlinks.Add Enchor: = Darblapas (“Izvēlne”). Diapazons (“A” un a), _

        Adrese: = ””, _

        Apakšadrese: = "" "& Izklājlapas (a). Nosaukums &" "! R1C1", _

        TextToDisplay: = Izklājlapas (a). Nosaukums

    Nākamā

End Sub

Šajā kodā mēs sākumā ievietojam jaunu darblapu ar nosaukumu “Izvēlne”. Ja jau ir darblapa ar nosaukumu “Izvēlne”, varat mainīt VBA kodu vai mainīt esošās darblapas nosaukumu. Turklāt mēs ievadīsim sarakstu jaunās darblapas pirmajā kolonnā. Ja jums ir jāievada katalogs citā diapazonā, varat to arī modificēt atbilstoši savām vajadzībām.

  1. Tagad rīkjoslā nospiediet pogu “Run Sub”Palaist apakš

Turklāt jūs varat arī nospiest taustiņu “F5” uz tastatūras.

  1. Tagad atgriezieties pie darblapas saskarnes.Katalogs

Darbgrāmatā ir jauna darblapa ar nosaukumu “Izvēlne”. Visi lapu nosaukumi ir norādīti darblapā ar attiecīgajām hipersaitēm. Izmantojot šo metodi, jūs ātri varat izveidot katalogu.

Divu metožu salīdzinājums

Mūsu iepriekšējā rakstā Kā izveidot Excel katalogu, izmantojot hipersaites, katalogu pievienojam manuāli. Un mēs salīdzināsim divu metožu atšķirības zemāk esošajā tabulā.

salīdzinājums Izveidojiet katalogu manuāli Izmantojiet VBA procedūru
Priekšrocība 1. Katrs Excel lietotājs var viegli izmantot šo metodi.

2. Ja jums nav zināšanu par VBA, varat izmantot šo metodi.

1. Veicot VBA procedūras, jūs varat pabeigt šo uzdevumu tikai ar vienu klikšķi.

2. Varat arī mainīt VBA kodus, lai izpildītu citas prasības.

Trūkums 1. Ja darbgrāmatā ir daudz darblapu, jūs noteikti pavadīsit daudz laika hipersaišu ievietošanai.

2. Jums jāizvēlas hipersaites pa vienai, un tas viegli novedīs pie kļūdām.

1. Ja jums nav zināmi VBA kodi, palaižot kodus, rodas problēmas.

2. VBA kodu izmantošana sarežģīs uzdevumu.

 

Risiniet negaidītas situācijas programmā Excel

Ja bieži izmantojat programmu Excel uzdevumu pabeigšanai, neizbēgami saskarsieties ar dažām kļūdām. Vairumā gadījumu varat aizvērt programmu Excel un pēc tam to restartēt. Tādējādi šīs mazās kļūdas pazudīs. Tomēr dažas kļūdas programmā Excel var izraisīt nopietnus Excel bojājumus. Un rezultāts var būt neiedomājams. Šobrīd jūs varat labot xls datu problēmu izmantojot mūsu prasmīgo rīku. Izmantojot šo efektīvo rīku, vienīgais, kas jums jādara, ir gaidīt atkopšanas procesa pabeigšanu.

Autora ievads:

Anna Ma ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp labot doc datu bojājumus un perspektīvas remonta programmatūras produktus. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar

Kopīgot tūlīt:

Komentāri ir slēgti.