Come nascondere o scoprire dinamicamente schede multiple utilizzazione del VBA in Excel
Considera una situazione in cui devi nascondere e mostrare più fogli contemporaneamente. Se qualcuno si nasconde e scopre manualmente, ci vorrà molto tempo.
In questo articolo imparerai come nascondere o mostrare dinamicamente più schede utilizzando il codice VBA.
D): Voglio una macro che nasconda o mostri più schede in un determinato momento.
Di seguito è un’istantanea del foglio1 in cui ci saranno due elenchi dinamici, ad esempio Nascondi schede e Scopri schede
-
L’idea è quando clicchiamo sul pulsante Nascondi o Scopri i fogli elencati dovrebbero essere nascosti o mostrati Dobbiamo seguire i passaggi seguenti:
Per ottenere il risultato dobbiamo avviare l’editor di VB. Fare clic sulla scheda Sviluppatore * Dal gruppo Codice selezionare Visual Basic
-
Fare clic su Inserisci quindi su Modulo
Questo creerà un nuovo modulo.
Immettere il codice seguente nel modulo Sub HideTabs () Dim TabNo As DoubleDim LastTab As Double LastTab = Range (“Hide_TabsDNR”). Count On Error Resume Next For TabNo = 2 To LastTab Sheets (Range (“Hide_TabsDNR”) (TabNo)) .Visible = False Next TabNo On Error GoTo 0 Sheets (1) .Select End Sub
===
Sub UnHideTabs ()
Dim TabNo As Double
Dim LastTab As Double
LastTab = Range (“Hide_TabsDNR”). Count
In caso di errore Riprendi Avanti
For TabNo = 2 To LastTab
Fogli (Range (“UnHide_TabsDNR”) (TabNo)). Visible = True
Next TabNo
In caso di errore GoTo 0
Fogli (1). Seleziona
End Sub
-
Siamo pronti per eseguire la macro, se facciamo clic sul pulsante Nascondi tutti i fogli elencati verranno nascosti, fare riferimento all’istantanea sottostante
-
Allo stesso modo se facciamo clic sul pulsante Scopri, tutti i fogli nascosti menzionati nella colonna D verranno visualizzati.
In questo modo possiamo nascondere o mostrare dinamicamente più schede contemporaneamente.