Suggerimento: le altre lingue sono tradotte da Google. Puoi visitare il English versione di questo link.
Connetti
x
or
x
x
Registrati
x

or

Come creare dinamiche caselle di elenco a cascata in Excel?

È possibile sapere come creare un elenco a discesa di convalida a cascata in Excel. Tuttavia, come creare dinamiche caselle di elenco a cascata in Excel? Questo articolo introduce un metodo VBA per eliminarlo.

Creare caselle di elenco a cascata dinamiche con codice VBA


Creare caselle di elenco a cascata dinamiche con codice VBA


Come mostrato nella figura seguente, è necessario creare una casella di elenco padre contenente i valori univoci della colonna Drink e visualizzare tutti i valori corrispondenti nella seconda casella di riepilogo in base alla selezione nella casella di riepilogo genitore. Il seguente codice VBA ti aiuta a raggiungerlo. Si prega di fare come segue.

1. In primo luogo, è necessario estrarre tutti i valori univoci dalla colonna Drink. Seleziona una cella vuota, inserisci la formula dell'array =IFERROR(INDEX($A$2:$A$11, MATCH(0,COUNTIF($J$1:J1, $A$2:$A$11), 0)),"") nella Barra della formulae quindi premere il Ctrl + spostamento + entrare chiave. Quindi trascina il Riempi la maniglia per ottenere tutti i valori unici. Vedi screenshot:

Note: Nella formula, $A$2:$A$11 è l'intervallo da cui estrarrai valori unici. J1 è la cella in alto in cui si trova la tua formula.

Mancia: Se la formula è troppo difficile da ricordare e gestire, il Seleziona celle duplicate e uniche utilità di Kutools for Excel sarà una buona scelta per estrarre rapidamente tutti i valori univoci da una colonna.

Si prega di selezionare la colonna contiene valori unici da cui si estrae. Quindi abilitare l'utilità facendo clic Kutools > Seleziona > Seleziona celle duplicate e uniche. Nel Seleziona celle duplicate e uniche finestra di dialogo, selezionare il Tutto unico (inclusi i duplicati di 1st) opzione e fare clic su OK pulsante. Quindi tutti i valori univoci sono selezionati nella colonna. Si prega di copiarli e incollarli in un nuovo posto. Vedi screenshot:

Kutools for Excel: con più di 200 pratici componenti aggiuntivi di Excel, liberi di provare senza limitazioni nei giorni 60. Scarica e prova gratis ora!

2. Inserire due caselle di elenco separatamente facendo clic Sviluppatore > inserire > Casella di riepilogo (controllo ActiveX). Vedi screenshot:

3. Fare clic con il pulsante destro del mouse sulla casella di riepilogo genitore e selezionare Proprietà dal menu di scelta rapida. Nel Proprietà finestra di dialogo, cambia il (Nome) campo Bere o altro nome di cui hai bisogno, inserisci l'intervallo di celle contenente i valori univoci estratti nel Gamma Lista Fill campo e chiudi la finestra di dialogo.

4. Ripetere il passaggio 3 per cambiare la seconda casella di riepilogo (Nome) campo all'elemento nel Proprietà la finestra di dialogo.

5. Fare clic con il tasto destro sulla scheda del foglio e selezionare Visualizza codice dal menu di scelta rapida. Quindi copiare sotto il codice VBA nella finestra del codice. Vedi screenshot:

Codice VBA: crea casellari dinamici a cascata in Excel

Dim xPreStr As String
Private Sub Drink_Click()
'Update by Extendoffice 2018/06/04
    Dim I, xRows As Long
    Dim xRg As Range
    Dim xRegStr As String
    Application.ScreenUpdating = False
    xRegStr = Me.Drink.Text
    Set xRg = Range("A2:A11")
    xRows = xRg.Rows.Count
    If xRegStr <> xPreStr Then
    Me.Item.Clear
   'Me.OtherListBoxName.Clear
    Set xRg = xRg(1)
    For I = 1 To xRows
        If xRg.Offset(I - 1).Value = xRegStr Then
            Me.Item.AddItem xRg.Offset(I - 1, 1).Value
            'Me.OtherListBoxName.AddItem xRg.Offset(I - 1, 2).Value
        End If
    Next
    xPreStr = xRegStr
    End If
    Application.ScreenUpdating = True
End Sub

Note: Nel codice Drink e Item sono i nomi di due caselle di elenco, modificali in base al tuo nome.

6. premi il altro + Q le chiavi per chiudere il Microsoft Visual Basic, Applications Edition finestra.

7. Disattiva la modalità di progettazione facendo clic Sviluppatore > Modalità di progettazione.

D'ora in poi, quando selezioni qualsiasi tipo di bevanda, ad esempio Caffè nella casella di riepilogo, tutti gli articoli del caffè verranno visualizzati nella seconda. Selezionare Tè o Vino visualizzerà solo gli elementi del tè o del vino nella seconda casella di riepilogo. Vedi screenshot:


Articoli correlati:



Strumenti di produttività consigliati per Excel

Kutools per Excel ti aiuta a terminare sempre il lavoro in anticipo e a distinguerti dalla folla

  • Oltre alle potenti funzionalità avanzate 300, progettate per gli scenari di lavoro 1500, che aumentano la produttività di 70%, offre più tempo per prendersi cura della famiglia e godersi la vita.
  • Non è più necessario memorizzare formule e codici VBA, da ora in poi lasciare riposare il cervello.
  • Diventa un esperto di Excel in 3 minuti, operazioni complicate e ripetute possono essere eseguite in pochi secondi,
  • Riduci ogni giorno migliaia di operazioni con tastiera e mouse, per esempio addio alle malattie professionali.
  • 110,000 persone altamente efficaci e 300 + la scelta delle aziende di fama mondiale.
  • 60-day completa funzionalità di prova gratuita. Garanzie di rimborso 60-day. 2 anni di upgrade e supporto gratuiti.

Porta la navigazione e l'editing a schede in Microsoft Office, molto più potente delle schede del browser

  • Office Tab è progettato per Word, Excel, PowerPoint e altre applicazioni Office: Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la tua produttività di 50% e riduce centinaia di clic del mouse per te ogni giorno!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.