Macro's die op een hele werkmap worden toegepast, kunnen handig zijn om gegevens van meerdere bladen naar een nieuwe werkmap te extraheren, geavanceerde opmaak op alle bladen toe te passen of vele andere redenen. Hier is de basissyntaxis en een werkend codevoorbeeld voor vba dat op elk blad in een werkmap werkt.
Loop door elk blad in de werkmap
De basissyntaxis voor het doorlopen van elk blad in een werkmap en het toepassen van VBA-code erop is:
| 12345 | Voor elke ws In werkbladen'Update of doe hier iets'Volgende |
Werk elk werkblad in de werkmap bij met VBA
Voor een werkend voorbeeld kopieert en plakt u de volgende code in een module en voert u deze uit. Het resultaat is tekst die in cel A1 van elk blad in uw werkmap wordt geplaatst.
| 1234567891011121314151617181920212223242526272829 | Openbare Sub DoToAll()'Declareer onze variabele'Dim ws als werkbladVoor elke ws In werkbladen'plaats code tussen de For en Next''voor wat je zou willen doen om''elk vel'ws.Range("A1") = "easyexcel.net"VolgendeEinde sub |
