Hoe u alle bladen kunt weergeven met vba (met voorbeeld)

U kunt de eigenschap Zichtbaar in VBA gebruiken om een blad in een Excel-werkmap weer te geven.

Om alle werkbladen in een werkmap weer te geven, kunt u de volgende syntaxis gebruiken:

 Sub UnhideAllSheets()

Dim ws As Worksheet

    For Each ws In Worksheets
        ws.Visible = True
    Next ws

End Sub

Met behulp van een eenvoudige For Each- lus en het specificeren van Visible = True , vertellen we Excel om alle bladen in de werkmap weer te geven.

Het volgende voorbeeld laat zien hoe u deze syntaxis in de praktijk kunt gebruiken.

Voorbeeld: hoe u alle bladen kunt weergeven met VBA

Stel dat we een Excel-werkmap hebben met vier bladen:

Stel nu dat we met de rechtermuisknop op Blad4 klikken en vervolgens op Verbergen klikken:

Laten we zeggen dat we dit proces herhalen met Blad2 , zodat de enige zichtbare bladen nu Blad1 en Blad3 zijn.

Stel dat we VBA willen gebruiken om alle bladen in de werkmap weer te geven.

We kunnen hiervoor de volgende macro maken:

 Sub UnhideAllSheets()

Dim ws As Worksheet

    For Each ws In Worksheets
        ws.Visible = True
    Next ws

End Sub

Zodra deze macro is uitgevoerd, worden alle bladen in de werkmap weergegeven:

Opmerking : u kunt hier de volledige documentatie voor de eigenschap Visible in VBA vinden.

Aanvullende bronnen

In de volgende tutorials wordt uitgelegd hoe u andere veelvoorkomende taken in VBA kunt uitvoeren:

VBA: hoe u de laatst gebruikte regel kunt vinden
VBA: Hoe de laatst gebruikte kolom te vinden
VBA: deelvensters bevriezen