Satura rādītājs
Tālāk norādītais makro aplūko katru darbgrāmatas lapu un raksta katras lapas cilnes nosaukumu secīgi jūsu izvēlētajai lapai. Tas varētu būt noderīgi, lai ātri izveidotu sarakstu ar visām darbgrāmatas lapām ar daudzām lapām.
Uzskaitiet visas darblapas darbgrāmatā
Lai izmantotu makro, vienkārši nomainiet vārdu Sheet1 (tas parādās divreiz) kodā ar cilnes nosaukumu, kurā vēlaties iegūt rezultātus. Pārliecinieties, vai izvades cilnē nav svarīgas informācijas, jo tā pirms rakstīšanas tajā notīra datus.
123456789101112131415 | Apakšsaraksta lapas ()Dim ws kā darblapaDim x kā vesels skaitlisx = 1Izklājlapas ("1. lapa"). Diapazons ("A: A"). SkaidrsPar katru ws darblapāsIzklājlapas ("1. lapa"). Šūnas (x, 1) = ws.Namex = x + 1Nākamais wsBeigu apakš |