Skip to main content

Kutools per Office — Una Suite. Cinque Strumenti. Ottieni di Più.

Come creare elenchi a discesa dipendenti in un documento Word?

Author Siluvia Last modified
Example showing limiting the choices in the second drop-down list based on the selected option in the first drop-down list

Come mostrato nello screenshot, potresti voler limitare le scelte nel secondo elenco a discesa in base alla selezione effettuata nel primo elenco a discesa. Questo articolo ti mostra come creare elenchi a discesa dipendenti in un documento Word.

Crea elenchi a discesa dipendenti in Word con il codice VBA

Crea elenchi a discesa dipendenti in Word con il codice VBA

Il metodo VBA seguente ti aiuta a creare un elenco a discesa dipendente in cui il secondo elenco cambia in base a ciò che viene selezionato nel primo elenco. Segui questi passaggi:

  1. Assicurati che la scheda "Sviluppatore" sia visibile nella barra multifunzione di Word (se non lo è, consulta il tutorial Come mostrare la scheda Sviluppatore in Word?). Quindi inserisci due elenchi a discesa facendo clic su "Sviluppatore" > "Moduli legacy" > "Campo modulo elenco a discesa" due volte.
    Developer tab with Legacy Forms selected and Drop-Down Form Field highlighted
  2. Fai clic con il tasto destro sul primo menu a discesa (questo sarà l'elenco principale) e fai clic su "Proprietà".
    First drop-down list right-clicked with Properties option selected
  3. Nella finestra di dialogo "Opzioni campo modulo elenco a discesa":
    1. Inserisci le categorie (ad esempio, "Frutta", "Verdura", "Carne") una alla volta nella casella "Elemento elenco a discesa", facendo clic su "Aggiungi" dopo ogni voce.
    2. Digita "ddfood" nella casella "Segnalibro".
    3. Fai clic su "OK".
      Drop-down Form Field Options dialog box
  4. Fai clic con il tasto destro sul secondo elenco a discesa, seleziona "Proprietà", digita "ddCategory" nella casella "Segnalibro" e fai clic su "OK".
    Drop-down Form Field Options dialog box
  5. Premi Alt + F11 per aprire la finestra Microsoft Visual Basic for Applications.
  6. Nella finestra VBA, fai clic su "Inserisci" > "Modulo", quindi incolla il codice seguente: 
    Sub Populateddfood()
'Update by Extendoffice 2018/10/25
    Dim xDirection As FormField
    Dim xState As FormField
    On Error Resume Next
    Set xDirection = ActiveDocument.FormFields("ddfood")
    Set xState = ActiveDocument.FormFields("ddCategory")
    If ((xDirection Is Nothing) Or (xState Is Nothing)) Then Exit Sub
    With xState.DropDown.ListEntries
        .Clear
        Select Case xDirection.Result
            Case "Fruit"
                .Add "Apple"
                .Add "Banana"
                .Add "Peach"
                .Add "Lychee"
                .Add "Watermelon"
            Case "Vegetable"
                .Add "Cabbage"
                .Add "Onion"
            Case "Meat"
                .Add "Pork"
                .Add "Beef"
                .Add "Mutton"
        End Select
    End With
End Sub

    Note:

    • Nel codice, modifica gli elementi sotto ogni istruzione "Case" per adattarli al tuo contenuto.
    • "ddfood" e "ddCategory" devono corrispondere ai nomi dei segnalibri che hai inserito nelle finestre di dialogo "Opzioni campo modulo elenco a discesa".
  7. Salva il codice e torna al tuo documento.
  8. Fai nuovamente clic con il tasto destro sul primo elenco a discesa e seleziona "Proprietà". Nella finestra di dialogo "Opzioni campo modulo elenco a discesa" che appare, dal menu a discesa "Uscita", scegli il nome della macro "Populateddfood", quindi fai clic su "OK".
    Drop-down Form Field Options dialog box
  9. Fai clic su "Sviluppatore" > "Limita modifica".
    Restrict Editing button on the Developer tab on the ribbon
  10. Nel riquadro "Limita modifica":
    1. Seleziona "Consenti solo questo tipo di modifica nel documento".
    2. Seleziona "Compilazione moduli" dall'elenco a discesa.
    3. Fai clic su "Sì, avvia l'applicazione della protezione".
    4. Nella finestra di dialogo "Avvia applicazione della protezione", imposta una password e fai clic su "OK".
      Restrict Editing pane and Start Enforcing Protection dialog

Ora l'elenco a discesa dipendente è attivo. Quando selezioni "Frutta" nel primo elenco, appariranno solo opzioni relative alla frutta nel secondo elenco.

Examples showing limiting the choices in the second drop-down list based on the selected option in the first drop-down list

I migliori strumenti per la produttività in ufficio

Kutools for Word - Eleva la tua esperienza su Word con oltre 100 funzioni straordinarie!

🤖 Funzionalità AI di Kutools: Assistente AI / Assistente in Tempo Reale / Super Lucida (Mantieni Formato) / Super Traduci (Mantieni Formato) / Redazione AI / Correzione AI...

📘 Maestria del Documento: Dividi Pagine / Unisci Documenti / Esporta Intervallo in vari formati (PDF/TXT/DOC/HTML...) / Conversione in batch in PDF...

✏ Modifica del Testo: Trova e Sostituisci in batch su più file / Ridimensiona tutte le Immagini / Trasponi Righe e Colonne della Tabella / Converti Tabella in Testo...

🧹 Pulizia senza sforzo: Elimina Spazi Extra / Interruzioni di Sezione / Casella di testo / Collegamenti ipertestuali / Per altri strumenti di rimozione, visita il gruppo Rimuovi...

➕ Inserimenti Creativi: Inserisci Separatore delle Migliaia / Casella di Controllo / Pulsante di Opzione / Codice QR / Codice a Barre / Immagini multiple / Scopri di più nel gruppo Inserisci...

🔍 Selezioni Accurate: Individua Pagine Specifiche / Tabelle / Forma / Paragrafo di Intestazione / Migliora la navigazione con altre funzioni di Seleziona...

⭐ Miglioramenti Speciali: Vai a qualsiasi Intervallo / Inserimento automatico di testo ripetitivo / Passa tra Finestre dei Documenti /11 strumenti di Conversione...

🌍 Supporta oltre40 lingue: Usa Kutools nella lingua che preferisci – Inglese, Spagnolo, Tedesco, Francese, Cinese, e più di altre40 lingue!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Vuoi provare queste funzionalità? Scarica subito Kutools for Word! 🚀
 

✨ Kutools for Office – Una sola installazione, cinque strumenti potenti!

Include Office Tab Pro · Kutools per Excel · Kutools per Outlook · Kutools for Word · Kutools for PowerPoint

📦 Ottieni tutti e5 gli strumenti in un'unica suite | 🔗 Integrazione perfetta con Microsoft Office | ⚡ Risparmia tempo e aumenta subito la produttività

I migliori strumenti per la produttività in ufficio

Kutools for Word - 100+ strumenti per Word

Download gratuito Acquista ora Scopri di più su Kutools