Kako pregledavati listove u Excelu pomoću VBA

Dok automatizirate uobičajene dosadne zadatke programa Excel u VBA -u, imat ćete potrebu proći kroz sve listove. I zato ste, naravno, ovdje.

Pogledajmo kôd za prolaženje kroz listove u radnoj knjizi.

VBA kôd za petlju u svim listovima u aktivnoj knjizi i ispis listova Naziv

Sub loopSheets () Za svaki ws U ActiveWorkbook.Worksheets Debug.Print ws.Name Sljedeći ws Kraj Sub

Gornji vba kôd petlja kroz svaki list u aktivnoj radnoj knjizi i ispisuje naziv lista

Kako radi?

Vrlo je jednostavno. Kažemo VBA -i da svaki radni list pohrani u aktivnu radnu knjigu u ws, a zatim ispiše njegovo ime metodom name.

Prođite kroz sve listove osim jednog

Dakle, ako pokušavate spojiti više listova u jedan glavni list, morat ćete proći kroz svaki list. kopirajte podatke svakog lista u glavni list. No, htjeli biste samo da se glavni list ne petlja. Recimo da ste glavni list nazvali "Master". U tom slučaju koristite ovu metodu:

Sub loopSheets () Za svaki ws u ActiveWorkbook.Worksheets If ws.Name "Master" Zatim Debug.Print ws.Name & "Copied" End If Next ws End Sub

Gotovo je isti kao gornji kod, samo s dodatkom naredbe If.

Ako ws.Name "Gospodar" Tada

Ova linija provjerava je li naziv trenutnog radnog lista "Master". ako nije, kôd između bloka if radi. Inače kod unutar ako je blok preskočen.

Pa da, dečki, evo kako možete pregledati radne listove u Excelu. Zatim ćemo naučiti kako objediniti više listova u jedan pomoću vba.