În timp ce automatizați sarcinile obișnuite plictisitoare ale excel în VBA, veți avea nevoie să parcurgeți fiecare colă. Și de aceea sunteți aici, desigur.
Să vedem codul pentru a parcurge foile într-un registru de lucru.
Codul VBA pentru a se bucla în toate colile din Activeworkbook și tipăriți numele colilor
Sub loopSheets () Pentru fiecare ws din ActiveWorkbook.Worksheets Debug.Print ws.Name Next ws End Sub
Codul vba de mai sus, parcurge fiecare foaie din registrul de lucru activ și imprimă numele foilor
Cum functioneaza?
Este destul de simplu. Îi spunem VBA să stocheze fiecare foaie de lucru în registrul de lucru activ în ws și apoi să tipărească numele folosind metoda nume.
Buclați prin toate foile, cu excepția uneia
Deci, dacă încercați să îmbinați mai multe foi într-o singură foaie principală, va trebui să parcurgeți fiecare foaie. copiați datele fiecărei foi în foaia principală. Dar ați dori să excepți foaia principală de la buclă. Să presupunem că ați numit foaia master ca „Master”. În acest caz, utilizați această metodă:
Sub loopSheets () Pentru fiecare ws din ActiveWorkbook.Worksheets If ws.Name "Master" Apoi Debug.Print ws.Name & "Copied" End If Next ws End Sub
Este aproape la fel ca codul de mai sus, cu doar adăugarea instrucțiunii If.
Dacă ws.Nume "Maestru" Atunci
Această linie verifică dacă numele foii de lucru curente este „Master”. dacă nu, codul dintre blocul dacă rulează. Altfel codul din interior dacă blocul este omis.
Așa că da, băieți, așa puteți parcurge foile de lucru în Excel. Apoi vom învăța cum să consolidăm mai multe foi într-una folosind vba.
Descărcare fișier
Cum să buclați prin foi în Excel folosind VBAArticole similare:
Ștergeți foile fără solicitări de confirmare folosind VBA în Microsoft Excel
Adăugați și salvați un registru de lucru nou folosind VBA în Microsoft Excel 2016
Afișați un mesaj pe bara de stare Excel VBA
Dezactivați mesajele de avertizare folosind VBA în Microsoft Excel 2016
Articole populare:
Funcția VLOOKUP în Excel
COUNTIF în Excel 2016
Cum se utilizează funcția SUMIF în Excel