Note: The other languages of the website are Google-translated. Back to English

Come utilizzare la casella di controllo per nascondere / mostrare righe o colonne in Excel?

Supponendo che sia necessario utilizzare una casella di controllo per nascondere o mostrare determinate righe o colonne. Ad esempio, quando la casella di controllo Active X Control è selezionata, vengono visualizzate determinate righe o colonne, altrimenti verranno nascoste. Questo articolo mostra il metodo di come utilizzare la casella di controllo per nascondere / mostrare righe o colonne in Excel con i dettagli.

Usa la casella di controllo per nascondere / mostrare righe o colonne con codice VBA


Usa la casella di controllo per nascondere / mostrare righe o colonne con codice VBA

Il seguente codice VBA può aiutarti a nascondere / mostrare determinate righe o colonne con la casella di controllo.

1. Dopo aver inserito una casella di controllo Active X Control nel foglio di lavoro, fare clic con il pulsante destro del mouse sulla casella di controllo e quindi selezionare Visualizza codice dal menu di scelta rapida. Vedi screenshot:

2. Nel Microsoft Visual Basic, Applications Edition finestra, copia e incolla il seguente codice VBA nella finestra del codice.

Codice VBA: utilizza la casella di controllo per nascondere / mostrare righe o colonne

Private Sub CheckBox1_Click()
    [C:D].EntireColumn.Hidden = Not CheckBox1
End Sub

Note:

1. Nel codice VBA, [CD]. Colonna intera significa che le colonne C e D verranno nascoste o mostrate selezionando o deselezionando la casella di controllo corrispondente.

2. Per nascondere o visualizzare determinate righe come la riga 6: 9, modificare la [CD]. Colonna intera a [6: 9]. Intera riga nel codice VBA.

3. premi il altro + Q contemporaneamente i tasti per chiudere il file Microsoft Visual Basic, Applications Edition finestra.

4. Ora spegni il file Modalità di progettazione sotto il Costruttori scheda come mostrato nell'immagine sottostante:

D'ora in poi, quando la casella di controllo è selezionata, vengono visualizzate le righe o le colonne specificate. Quando è deselezionato, le righe o le colonne specificate vengono nascoste.


Articoli correlati:


I migliori strumenti per la produttività in ufficio

Kutools per Excel risolve la maggior parte dei tuoi problemi e aumenta la tua produttività dell'80%

  • Riutilizzo: Inserisci rapidamente formule complesse, grafici e tutto ciò che hai usato prima; Crittografa celle con password; Crea mailing list e invia email ...
  • Bar Super Formula (modifica facilmente più righe di testo e formula); Layout di lettura (leggi e modifica facilmente un gran numero di celle); Incolla su intervallo filtrato...
  • Unisci celle / righe / colonne senza perdere dati; Contenuto delle celle divise; Combina righe / colonne duplicate... Impedisci celle duplicate; Confronta intervalli...
  • Seleziona Duplica o Unico Righe; Seleziona Righe vuote (tutte le celle sono vuote); Super Find e Fuzzy Find in molte cartelle di lavoro; Selezione casuale ...
  • Copia esatta Più celle senza modificare il riferimento della formula; Riferimenti di creazione automatica a più fogli; Inserisci punti elenco, Caselle di controllo e altro ...
  • Estrai testo, Aggiungi testo, Rimuovi per posizione, Rimuovi spazio; Creare e stampare totali parziali di paging; Converti contenuto e commenti tra celle...
  • Super filtro (salva e applica schemi di filtri ad altri fogli); Ordinamento avanzato per mese / settimana / giorno, frequenza e altro; Filtro speciale in grassetto, corsivo ...
  • Combina cartelle di lavoro e fogli di lavoro; Unisci tabelle in base a colonne chiave; Suddividi i dati in più fogli; Conversione in batch xls, xlsx e PDF...
  • Più di 300 potenti funzionalità. Supporta Office/Excel 2007-2021 e 365. Supporta tutte le lingue. Facile implementazione nella tua azienda o organizzazione. Funzionalità complete Prova gratuita di 30 giorni. Garanzia di rimborso di 60 giorni.
scheda kte 201905

Scheda Office porta l'interfaccia a schede a Office e semplifica notevolmente il lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!
fondo officetab
Commenti (26)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
C'è un modo per utilizzare la casella di controllo "Usa per nascondere/mostrare righe o colonne con codice VBA" su un foglio di lavoro protetto?
Questo commento è stato fatto dal moderatore sul sito
@Wayne:

CheckBox secondario privato1_Click()
ActiveSheet.Password non protetta:="xxxxx"
Righe("284:351").EntireRow.Hidden = Non CheckBox1
Password di ActiveSheet.Protect:="xxxx"
End Sub
Questo commento è stato fatto dal moderatore sul sito
Sembra che questo codice vada solo in una direzione, cioè solo nasconderlo e non mostrarlo quando viene cliccato. C'è un modo per correggere questo?
Questo commento è stato fatto dal moderatore sul sito
Abbiamo lo stesso problema ma ho scoperto che stiamo usando i controlli modulo e non i controlli ActiveX. Il codice funziona perfettamente nel pulsante della casella di controllo ActiveX Control. Disattiva semplicemente la modalità di progettazione in modo da poter fare clic sulla casella di controllo.
Questo commento è stato fatto dal moderatore sul sito
Abbiamo lo stesso problema ma troviamo un modo per farlo funzionare. Utilizza la casella di controllo Controlli ActiveX e non la casella di controllo Form Control. Il codice funziona perfettamente con la casella di controllo ActiveX.


CheckBox secondario privato1_Click()
[C:D].EntireColumn.Hidden = Non CheckBox1
End Sub
Questo commento è stato fatto dal moderatore sul sito
Ciao,

Sto cercando di utilizzare questo codice per nascondere/scoprire su un foglio separato dalla casella di controllo. Cosa devo aggiungere per farlo funzionare? Grazie in anticipo.

CheckBox secondario privato1_Click()
[C:D].EntireColumn.Hidden = Non CheckBox1
End Sub
Questo commento è stato fatto dal moderatore sul sito
Buona giornata,
Come mostrato nel codice seguente, sostituire "Sheet4" con il nome del foglio separato.

CheckBox secondario privato1_Click()
[Foglio4!C:D].EntireColumn.Hidden = Non CheckBox1
End Sub
Questo commento è stato fatto dal moderatore sul sito
Ciao,

Ciao, ho fatto il codice, funziona bene ma quando provo a fare lo stesso in più di una casella di controllo sullo stesso foglio funzionano "insieme", nascondono o mostrano le righe solo se tutte e tre le caselle di controllo sono selezionate.
Sto cercando di rendere queste tre caselle di controllo indipendenti l'una dall'altra. E lascia che gli utenti segnino solo una casella alla volta.
Questo commento è stato fatto dal moderatore sul sito
Ciao Lou,
Assicurati che le caselle di controllo che hai creato siano caselle di controllo dei controlli ActiveX. Queste caselle di controllo funzionano in modo indipendente nel foglio di lavoro.
Grazie per il tuo commento.
Questo commento è stato fatto dal moderatore sul sito
Ciao,

C'è un modo per nascondere solo una riga. Se metto 6:9 tutte le righe sono nascoste, ma se inserisco solo 6, viene visualizzato come errore. Apprezzerei il tuo aiuto, grazie!
Questo commento è stato fatto dal moderatore sul sito
Ciao,
Si prega di modificare la seconda riga del codice in:
[6:6].EntireRow.Hidden = Non CheckBox1.
Grazie per il tuo commento.
Questo commento è stato fatto dal moderatore sul sito
Stavo cercando di svelare i primi tre ruoli ma non ha funzionato. Come posso farlo, lo so che la persona che mi ha inviato quel file vuole sapere la mia abilità, posso risolverlo o no.
Questo commento è stato fatto dal moderatore sul sito
Ciao maggio,
Scusa non ho capito il tuo punto.
Questo commento è stato fatto dal moderatore sul sito
Ha funzionato, ma poi quando ho salvato il file e lo riapro non funziona. Ho provato a salvarlo come foglio Excel Macro e come normale cartella di lavoro. Cosa ho fatto di sbagliato? Voglio darlo a qualcun altro per usarlo e non voglio che siano confusi.
Questo commento è stato fatto dal moderatore sul sito
Ciao angela, dopo aver aggiunto il codice nella cartella di lavoro, fai clic su File > Salva con nome, scegli dove salvare il file, nella finestra di dialogo Salva con nome, scegli Cartella di lavoro abilitata per macro di Excel (*.xlsm) dal tipo di salvataggio menu a discesa e infine fare clic su Salva. Quindi invia questa cartella di lavoro con abilitazione macro di Excel ad altri.
Questo commento è stato fatto dal moderatore sul sito
Molto utile, ma come posso usarlo per nascondere solo una parte del foglio di calcolo? Intendo ad esempio le celle B2: B11, come combinare queste due funzioni? Grazie.
Questo commento è stato fatto dal moderatore sul sito
E se volessi utilizzare 3 diverse caselle di controllo e volessi che ciascuna attivasse nascondendo diversi gruppi di righe? Ho provato e guardato dappertutto. Quando provo a modificare questo codice, le caselle di controllo sembrano interferire tra loro.
Questo commento è stato fatto dal moderatore sul sito
E se volessi utilizzare 3 diverse caselle di controllo e volessi che ciascuna attivasse nascondendo diversi gruppi di righe? Ho provato e guardato dappertutto. Quando provo a modificare questo codice, le caselle di controllo sembrano interferire tra loro.
Questo commento è stato fatto dal moderatore sul sito
Esse código oculta, mas não executa a reexibição quando desmarcar.

Alguém pode complementar por favor? Preciso di un codice per occultare e riprodurre le colonne indicate.

CheckBox secondario privato1_Click()
[C:D].EntireColumn.Hidden = Non CheckBox1
End Sub

Grazie
Questo commento è stato fatto dal moderatore sul sito
Ciao Welington Mesquita,
Questo codice VBA può ottenere:
Quando la checkbox1 è spuntata, viene visualizzata la colonna C:D;
Quando è deselezionata, le colonne C:D sono nascoste.
Il codice funziona bene nel mio caso. Quale versione di Excel stai utilizzando?
Questo commento è stato fatto dal moderatore sul sito
Buon giorno!
Spero che tutti estejam bem!

Tenho uma situação dove precisamente ocultar / reexibir a colonna utilizando o Control ActiveX quando solecionado o item.

Esempio: Tenho coluna com os nomis: Planejado, Realizado, Análise Vertical, Análise Vertical, Variação (R$) e Variação (%), no entanto, que poder selecionar individual as colunas intercalando se necessário. Selecionar somente a coluna Realizado e Variação, mesmo não estando na sequencia.

Desde já agradeço,
Welington
Questo commento è stato fatto dal moderatore sul sito
Ciao,
Scusa non ho capito cosa intendi. Ti dispiacerebbe fornire uno screenshot dei tuoi dati?
Potrebbe essere necessario allegare uno screenshot o un file di esempio per descrivere più chiaramente il problema riscontrato.
Questo commento è stato fatto dal moderatore sul sito
E per occultare le colonne non ci sono sequenze?
Esempio: A e C

Questa posizione è stata applicata in serie per A e C ?

"Sub CheckBox1_Click privato ()
[C:D].EntireColumn.Hidden = Nessuna casella di controllo1
Fine Sub"
Questo commento è stato fatto dal moderatore sul sito
Ciao,
Il seguente codice VBA può farti un favore. Per favore, provalo.
Private Sub CheckBox1_Click()
'Updated by Extendoffice 20220810
    [C:C, A:A].EntireColumn.Hidden = Not CheckBox1
End Sub
Questo commento è stato fatto dal moderatore sul sito
Bei mir werden die Zellen nicht ausgeblendet, wenn das Kontrollkästchen wieder in aktiv ist.

Mein Ziel ist mit dem aktiveren des Kontrollkästchen die Zeile 7 einzublenden und wenn ich den Haken wieder entferne sollte Zeile 47 wieder ausgeblendet sein.
Aiuto ....
Questo commento è stato fatto dal moderatore sul sito
Ciao rose,
Il seguente codice VBA può aiutare.
Private Sub CheckBox1_Click()
[47:47].EntireRow.Hidden = Not CheckBox1
End Sub
Non ci sono ancora commenti pubblicati qui
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL