Kā iegūt lapu nosaukumus, izmantojot VBA programmā Microsoft Excel
Ja vēlaties uzzināt veidu, kā iegūt visus redzamos lapas nosaukumus, t.i., neslēptos.
Šajā rakstā mēs uzzināsim, kā iegūt tikai redzamo lapu nosaukumus, izmantojot VBA kodu.
Jautājums): Man ir vairākas lapas vienā failā, un es esmu paslēpis lapas, kuras nevēlos redzēt citiem; Es gribu kodu, kas man piešķirs visu redzamo lapu nosaukumu.
Pieņemsim, ka mums ir 5 lapas, un mēs apzināti slēpjam noteiktu lapu.
Lai iegūtu redzamo lapu nosaukumu, mums jāveic šādas darbības:
- Noklikšķiniet uz cilnes Izstrādātājs
- Kodu grupā atlasiet Visual Basic
Nokopējiet zemāk esošo kodu standarta modulī
Sub VisibleSheets ()
Dim i kā vesels skaitlis, j kā vesels skaitlis: j = 1
Šūnas (1, 1). Pašreizējais reģions. Šūnas. Skaidrs
Attiecībā uz i = 1 līdz lapām. Skait
Ja lapas (i). Redzams = -1 Tad
Šūnas (j, 1) = loksnes (i). Nosaukums
j = j + 1
Beigas Ja
Nākamais
Beigt apakš
- Pirmo reizi, palaižot kodu, A slejā tiks parādīti visu pašreizējās lapas lapu nosaukumi
- Ja mēs paslēpsim Jan lapu, mums būs šāds lapu nosaukumu saraksts
Tādā veidā mēs varam iegūt visu redzamo lapu nosaukumu, izmantojot vba kodu.
Lejupielādēt - Kā iegūt lapu nosaukumus, izmantojot vba - xlsm