Tänk på en situation där du måste dölja och dölja flera ark åt gången. Om någon gömmer sig och döljer sig manuellt kommer det att ta mycket tid.
I den här artikeln lär du dig hur du dynamiskt döljer eller visar flera flikar med VBA -kod.
F): Jag vill ha ett makro som döljer eller visar flera flikar samtidigt.
Följande är en ögonblicksbild av blad 1 där det kommer att finnas två dynamiska listor, dvs dölj flikar och dölj flikar
- Tanken är att när vi klickar på knappen Dölj eller Ta bort ska de listade arken döljas eller visas
Vi måste följa stegen nedan:
- För att få resultatet måste vi starta VB -editor
- Klicka på fliken Utvecklare
- Välj Visual Basic i kodgruppen
- Klicka på Infoga och sedan Modul
Detta skapar en ny modul.
Ange följande kod i modulen
Sub HideTabs () Dim TabNo As DoubleDim LastTab As DoubleLastTab = Range ("Hide_TabsDNR"). Räkna
Vid fel Återuppta nästa
För TabNo = 2 Till LastTab
Kalkylark (intervall ("Hide_TabsDNR") (TabNo)). Synligt = falskt
Nästa flikNej
Vid fel GoTo 0
Ark (1) .Välj
Avsluta Sub
Sub UnHideTabs ()
Dim TabNo As Double
Dim LastTab As Double
LastTab = Range ("Hide_TabsDNR"). Räkna
Vid fel Återuppta nästa
För TabNo = 2 Till LastTab
Sheets (Range ("UnHide_TabsDNR") (TabNo)). Visible = True
Nästa flikNej
Vid fel GoTo 0
Ark (1) .Välj
Avsluta Sub
- Vi är alla inställda på att köra makrot, om vi klickar på dölj -knappen kommer alla listade blad att döljas se nedan ögonblicksbild
- På samma sätt om vi klickar på Unhide -knappen kommer alla dolda blad som nämns i kolumn D att visas.
På så sätt kan vi dynamiskt dölja eller ta bort flera flikar samtidigt.
