Как да преглеждате листове в Excel с помощта на VBA

Докато автоматизирате обичайните скучни задачи на excel във VBA, ще имате нужда да преглеждате всеки лист. И затова сте тук, разбира се.

Нека да видим кода за прелистване на листове в работна книга.

VBA код за циклиране във всички листове в Activeworkbook и отпечатване на листове Име

Sub loopSheets () За всеки ws В ActiveWorkbook.Worksheets Debug.Print ws.Name Next ws End Sub

Горният код VBA, цикъл през всеки лист в активна работна книга и отпечатва името на листа

Как работи?

Това е съвсем просто. Казваме на VBA да съхранява всеки работен лист в активна работна книга в ws и след това да отпечатва името му, използвайки метода на името.

Прегледайте всички листове с изключение на един

Така че, ако се опитвате да обедините няколко листа в един главен лист, ще трябва да преминете през всеки лист. копирайте данните на всеки лист в основния лист. Но бихте искали да изключите главния лист от цикъл. Да приемем, че сте нарекли главния лист като „Master“. В този случай използвайте този метод:

Sub loopSheets () За всеки ws В ActiveWorkbook.Worksheets If ws.Name "Master" Тогава Debug.Print ws.Name & "Copied" End If Next ws End Sub

Той е почти същият като горния код, само с добавяне на оператор If.

Ако ws.Name "Master" Тогава

Този ред проверява дали името на текущия работен лист е „Master“. ако не е, кодът между if блокът работи. Иначе кодът вътре, ако блокът е пропуснат.

Така че да, момчета, ето как можете да преглеждате работни листове в Excel. След това ще научим как да обединим няколко листа в един с помощта на vba.