Kaip peržiūrėti „Excel“ lapus naudojant VBA

Anonim

Automatizuodami įprastas nuobodžias „Excel“ užduotis VBA, jums reikės peržiūrėti kiekvieną lapą. Ir todėl, žinoma, esate čia.

Pažiūrėkime kodą, kurį reikia perkelti į darbaknygės lapus.

„VBA Code To Loop“ visuose „Activeworkbook“ lapuose ir spausdinimo lapuose Pavadinimas

Sub loopSheets () Kiekvienam ws ActiveWorkbook. Darbo lapų derinimas. Spausdinti ws. Pavadinimas Kitas ws End Sub

Aukščiau pateiktas vba kodas perkelia kiekvieną aktyvios darbaknygės lapą ir spausdina lapų pavadinimą

Kaip tai veikia?

Tai gana paprasta. Mes liepiame VBA saugoti kiekvieną darbalapį aktyvioje darbaknygėje ws ir tada atspausdinti jo pavadinimą naudojant pavadinimo metodą.

Peržiūrėkite visus lapus, išskyrus vieną

Taigi, jei bandote sujungti kelis lapus į vieną pagrindinį lapą, turėsite peržvelgti kiekvieną lapą. nukopijuokite kiekvieno lapo duomenis į pagrindinį lapą. Bet norėtųsi, kad pagrindinis lapas nebūtų pašalintas iš kilpų. Tarkime, pagrindinį lapą pavadinote „Meistru“. Tokiu atveju naudokite šį metodą:

Sub kilpa 

Tai beveik tas pats, kaip ir aukščiau pateiktas kodas, tik pridėjus „If“ teiginį.

Jei ws.Vardas "Meistras" Tada 

Ši eilutė patikrina, ar dabartinio darbalapio pavadinimas yra „Pagrindinis“. jei ne, kodas tarp, jei blokas veikia. Priešingu atveju, jei blokas praleidžiamas, įveskite kodą.

Taigi taip, vaikinai, taip galite peržiūrėti „Excel“ darbalapius. Toliau sužinosime, kaip sujungti kelis lapus į vieną naudojant „vba“.

Atsisiųsti failą

Kaip peržiūrėti „Excel“ lapus naudojant VBA

Susiję straipsniai:

Ištrinkite lapus be patvirtinimo raginimų naudodami „Microsoft Excel“ VBA

Pridėkite ir išsaugokite naują darbaknygę naudodami „Microsoft Excel 2016“ VBA

Rodyti pranešimą „Excel“ VBA būsenos juostoje

Išjunkite įspėjamuosius pranešimus naudodami VBA programoje „Microsoft Excel 2016“

Populiarūs straipsniai:

„VLOOKUP“ funkcija „Excel“

COUNTIF „Excel 2016“

Kaip naudoti „SUMIF“ funkciją „Excel“