Come creare un elenco dinamico in un documento di Word?
Come illustrato nello screenshot, potresti voler limitare le opzioni del secondo elenco a discesa in base alla selezione effettuata nel primo. Questo articolo ti mostra come creare un elenco dinamico in un documento di Word.
Crea Elenco dinamico in Word con codice VBA
Il seguente metodo VBA ti permette di creare un elenco dinamico in cui il secondo elenco si aggiorna automaticamente in base alla selezione effettuata nel primo. Segui questi passaggi:
- Assicurati che la scheda «Sviluppo» sia visibile nella tua barra multifunzione di Word (in caso contrario, consulta l'esercitazione)Come mostrare la scheda Sviluppo in Word?). Inserisci quindi due elenchi a discesa facendo clic su «Sviluppo» > «Moduli legacy» > «Campo modulo a discesa» due volte.
- Fai clic con il pulsante destro del mouse sul primo elenco a discesa (quello principale) e seleziona “Proprietà”.
- Nella finestra di dialogo «Opzioni campo modulo a discesa»:
- Inserisci le categorie (ad esempio, «Frutta», «Verdura», «Carne») una alla volta nella casella «Elemento dell'elenco a discesa», facendo clic su «Aggiungi» dopo ciascuna.
- Digita "ddfood« nella casella »Segnalibro".
- Fai clic su «OK».
- Fai clic con il pulsante destro del mouse sul secondo Elenco a discesa, seleziona «Proprietà», digita "ddCategory« nella casella »Segnalibro« e fai clic su »OK".
- Premi Alt + F11 per aprire la finestra di Microsoft Visual Basic, Applications Edition.
- Nella finestra di VBA, fai clic su «Inserisci» > «Modulo», quindi incolla il seguente codice:
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 SubNote:
- Nel codice, personalizza gli elementi sotto ciascuna istruzione "Case" in base ai tuoi contenuti.
- "ddfood« e »ddCategory« devono corrispondere esattamente al nome del segnalibro specificato nelle finestre di dialogo »Opzioni campo modulo a discesa".
- Salva il codice e torna al documento.
- Fai nuovamente clic con il pulsante destro del mouse sul primo elenco a discesa e seleziona «Proprietà». Nella finestra di dialogo «Opzioni campo modulo a discesa» che si apre, scegli il nome della macro "Populateddfood« dall'elenco a discesa »Uscita«, quindi fai clic su »OK".
- Fai clic su «Sviluppo» > «Limita modifica».
- Nel riquadro «Limita modifica»:
- Seleziona “Consenti solo questo tipo di modifica nel documento”.
- Seleziona “Compilazione moduli” dal menu a discesa.
- Fai clic su «Sì, avvia protezione».
- Nella finestra di dialogo «Avvia protezione», imposta una password e clicca su «OK».
Ora l’elenco dinamico è attivo: quando selezioni «Frutta» nel primo elenco, nel secondo compariranno esclusivamente opzioni relative alla frutta.
Migliori strumenti per la produttività in Office
Kutools per Word – Migliora la tua esperienza con Word grazie a oltre 100 funzionalità eccezionali!
🤖Funzionalità KUTOOLS AI: Assistente AI / Assistente in Tempo Reale / Super Lucida (Mantieni formato) / Super Traduci (Mantieni formato) / Redazione AI / Correzione AI…
📘Padronanza dei documenti: Dividi pagine, unisci documenti, esporta la selezione in vari formati (PDF, TXT, DOC, HTML…) e conversione batch in PDF…
✏Modifica contenuti: 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 in un attimo spazi extra, interruzioni di sezione, caselle di testo e collegamenti ipertestuali. Per altri strumenti di rimozione, vai al gruppo Rimuovi…
➕Inserimenti creativi: Inserisci separatori delle migliaia, caselle di controllo, pulsanti di opzione, codici QR, codici a barre e immagini multiple. Scopri di più nel gruppo Inserisci…
🔍Selezioni precise: Individua con precisione pagine specifiche, tabelle, forme, paragrafi di intestazione e migliora la navigazione con altre funzionalità ...Seleziona...
⭐Miglioramenti stellari: Passa a qualsiasi posizione / Inserimento automatico di testo ripetitivo / Alterna tra i documenti Windows / 11 strumenti di conversione Strumenti di...
🌍Supporta oltre 40 lingue: Usa Kutools nella tua lingua preferita – tra cui inglese, spagnolo, tedesco, francese, cinese e molte altre!
Office Tab- Porta l'interfaccia a schede in Office e rende il tuo lavoro molto più semplice
- 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, anziché in nuove finestre.
- Aumenta la tua produttività del 50 % e riduci centinaia di clic del mouse ogni giorno!
✨ Kutools for Office – Un’installazione, cinque strumenti potenti!
Include Office Tab Pro·Kutools per Excel·Kutools per Outlook·Kutools per Word·Kutools for PowerPoint
📦 Ottieni tutti gli 5 strumenti in un’unica suite | 🔗 Integrazione perfetta con Microsoft Office | ⚡ Risparmia tempo e aumenta immediatamente la produttività
Migliori strumenti per la produttività in Office
Kutools per Word- Strumenti 100+ per Word
- 🤖KUTOOLS AI Funzionalità:Assistente AI/Assistente in Tempo Reale/Super Lucida/Super Traduci/Redazione AI/Correzione AI
- 📘Padronanza dei documenti:Dividi pagine/Unisci Documenti/Conversione batch in PDF
- ✏Modifica contenuti:Trova e sostituisci in batch/Ridimensiona tutte le immagini
- 🧹Pulizia senza sforzo:Rimuovi spazi extra/Rimuovi Interruzione di sezione
- ➕Inserimenti creativi:Inserisci separatori delle migliaia/Inserisci Casella di Controllo/Crea Codice QR
- 🌍Supporta oltre 40 lingue: Kutools parla la tua lingua – sono supportate oltre 40 lingue!