¿Cómo crear listas desplegables dependientes en un documento de Word?

Como se muestra en la captura de pantalla de la izquierda, debe limitar las opciones en la segunda lista desplegable en función de la opción en el primer menú desplegable, ¿cómo puede hacerlo? Este artículo le mostrará un método para crear listas desplegables dependientes en un documento de Word.
Cree listas desplegables dependientes en Word con código VBA
Cree listas desplegables dependientes en Word con código VBA
El siguiente código de VBA puede ayudarlo a crear una lista desplegable dependiente en un documento de Word. Siga las instrucciones paso a paso.
1. En primer lugar, debe insertar dos listas desplegables en su documento de Word. Hacer clic Developer > Formularios heredados > Campo de formulario desplegable. Ver captura de pantalla:
2. Haga clic con el botón derecho en la primera lista desplegable (esta lista desplegable debe ser la principal) y haga clic en Propiedades. Ver captura de pantalla:
3. En la apertura Opciones de campo de formulario desplegable cuadro de diálogo, debe:
3.1 Ingrese la categoría en el Elemento desplegable cuadro y luego haga clic en el Añada , repita la operación hasta que todas las categorías se agreguen al cuadro de lista desplegable Elementos en.
3.2 Entrar comida en el Bookmark encajonar.
3.3 Haga clic en OK botón. Ver captura de pantalla:
4. Haga clic derecho en la segunda lista desplegable, haga clic en Propiedades para abrir su Opciones de campo de formulario desplegable cuadro de diálogo, y en el diálogo, ingrese ddCategoría en el Bookmark cuadro y haga clic en el OK botón. Ver captura de pantalla:
5. presione el otro + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
6. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo, luego copie debajo del código VBA en la ventana del Módulo.
Código de VBA: cree una lista desplegable dependiente en Word
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
Notas
1. En el código, cambie los elementos en cada caso según lo necesite.
2. comida y ddCategoría debe coincidir con las opciones de marcador que ingresó en los dos anteriores Opciones de campo de formulario desplegable Cuadros de diálogo.
7. Guarde el código y vuelva al documento.
8. Haga clic con el botón derecho en la primera lista desplegable y haga clic en Propiedades para abrir el Opciones de campo de formulario desplegable caja de diálogo. En el cuadro de diálogo, seleccione el nombre de la macro anterior (aquí es Popolateddfood) del Exit lista desplegable y luego haga clic en el OK
9. Ahora haga clic en Developer > Restringir la edición como se muestra a continuación.
10. En el Restringir la edición panel, necesita:
10.1) Compruebe el Permitir solo este tipo de edición en el documento caja;
10.2) Seleccionar Rellenar formularios opción de la lista desplegable;
10.3) Haga clic en Sí, Comience a hacer cumplir la protección botón;
10.4) en el Empiece a aplicar la protección cuadro de diálogo, introduzca la contraseña y haga clic en el OK botón. Ver captura de pantalla:
Ahora se crea una lista desplegable dependiente. Al seleccionar Fruta en la primera lista desplegable, solo se pueden seleccionar las categorías de frutas en la segunda.
Herramientas de productividad de palabras recomendadas
Kutools para Word: más de 100 funciones avanzadas para Word, ahorre su 50% de tiempo
- Las operaciones complicadas y repetidas se pueden realizar un solo procesamiento en segundos.
- Inserte varias imágenes en carpetas en un documento de Word a la vez.
- Fusiona y combina varios archivos de Word en carpetas en uno con el orden que desees.
- Divida el documento actual en documentos separados según el encabezado, el salto de sección u otros criterios.
- Convierta archivos entre Doc y Docx, Docx y PDF, colección de herramientas para conversiones y selección comunes, etc.


























