¿Cómo insertar una lista desplegable codificada por colores en la tabla de Word?
Supongamos que tengo una tabla en mi documento de Word y ahora quiero insertar una lista desplegable codificada por colores en una columna de la tabla. Significa que cuando selecciono una opción del menú desplegable, el color de la celda se vuelve rojo y cuando selecciono otra opción en el menú desplegable, el color de la celda se vuelve verde como se muestra en la siguiente captura de pantalla. ¿Cómo podrías resolver este trabajo en un documento de Word?
Inserte la lista desplegable codificada por colores en un documento de Word con código VBA
Inserte la lista desplegable codificada por colores en un documento de Word con código VBA
Los siguientes pasos pueden ayudarlo a completar esta tarea según lo necesite, primero, inserte la lista desplegable y luego aplique el color para el menú desplegable. Por favor haz lo siguiente:
1. Seleccione una celda de la tabla donde desea insertar el menú desplegable y luego haga clic en Developer > Control de contenido de lista desplegable icono, vea la captura de pantalla:
2. El menú desplegable se inserta en la celda específica y luego haga clic en Developer > Propiedades, ver captura de pantalla:
3. En la Propiedades de control de contenido cuadro de diálogo, realice las siguientes operaciones:
(1.) Introduzca el nombre del título en el Título caja de texto;
(2.) Haga clic en Añada botón ir al Agregar opción diálogo;
(3.) En el Agregar opción cuadro de diálogo, escriba el elemento de la lista desplegable en el Nombre que se ve en la pagina caja de texto.
4. Repita el Paso 3 para insertar otros elementos de la lista desplegable que necesite.
5. Después de crear la primera lista desplegable, puede copiarla y pegarla en otras celdas que necesite. Ver captura de pantalla:
6. Entonces debe aplicar un código VBA, mantenga presionado el ALT + F11 teclas para abrir el Microsoft Visual Basic para aplicaciones ventana.
7. En la Microsoft Visual Basic para aplicaciones ventana, haga doble clic Este documento de Proyecto-Proyecto panel para abrir el modo y luego copie y pegue el siguiente código en el módulo en blanco.
Código de VBA: inserte la lista desplegable codificada por colores en la tabla de un documento de Word:
Private Sub Document_ContentControlOnExit(ByVal ContentControl As ContentControl, Cancel As Boolean)
With ContentControl.Range
If ContentControl.Title = "Status" Then
Select Case .Text
Case "Complete"
.Cells(1).Shading.BackgroundPatternColor = wdColorRed
Case "In Progress"
.Cells(1).Shading.BackgroundPatternColor = wdColorGreen
Case "Not Start"
.Cells(1).Shading.BackgroundPatternColor = wdColorBlue
Case Else
.Cells(1).Shading.BackgroundPatternColor = wdColorAutomatic
End Select
End If
End With
End Sub
Nota:: En el código anterior, Status es el nombre del título al crear la lista desplegable, y Finalizar el proyecto, En curso, No comenzar son los elementos de la lista desplegable, puede cambiarlos por los suyos. Y también puede cambiar el color según sus necesidades.
8. Luego guarde y cierre la ventana de código, ahora, cuando seleccione un elemento de la lista desplegable, su color relativo se llenará con la celda, vea la captura de pantalla:
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.
