¿Cómo agregar aleatoriamente color de fondo / relleno para celdas en Excel?
Digamos que necesita agregar fondo o color de relleno aleatoriamente para las celdas en el rango especificado, ¿cómo resolverlo? En este artículo, se proporcionan dos métodos para hacerlo fácilmente.
Agregue aleatoriamente color de fondo / relleno para celdas con VBA
Agregue aleatoriamente color de fondo / relleno para celdas con Kutools para Excel
Inserte aleatoriamente valores de la lista o columna especificada (sin repeticiones) en Excel
Kutools para Excel Insertar datos aleatorios La utilidad permite a los usuarios de Excel insertar aleatoriamente valores de la lista o columna especificada en Excel.
Agregue aleatoriamente color de fondo / relleno para celdas con VBA
El siguiente código de macro de VBA puede ayudarlo a agregar fondo o color de relleno para cada celda en un rango específico con colores aleatorios. Puede hacer lo siguiente:
Paso 1: Prensa otro + F11 teclas para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
Paso 2: Haga clic en Insertar> Módulo y luego pegue el siguiente código VBA en la ventana de apertura del Módulo.
VBA: agregue fondo o color de relleno para celdas con color aleatorio
Sub TrimExcessSpaces()
Dim rng As Range
Dim WorkRng As Range
Dim xRed As Byte
Dim xGreen As Byte
Dim xBule As Byte
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each rng In WorkRng
xRed = Application.WorksheetFunction.RandBetween(0, 255)
xGreen = Application.WorksheetFunction.RandBetween(0, 255)
xBule = Application.WorksheetFunction.RandBetween(0, 255)
rng.Pattern = xlSolid
rng.PatternColorIndex = xlAutomatic
rng.Interior.Color = VBA.RGB(xRed, xGreen, xBule)
Next
End Sub
Paso 3: Presione el F5 o haga clic en el Ejecutar botón para ejecutar esta macro de VBA.
Paso 4: Ahora aparece un cuadro de diálogo, simplemente seleccione el rango que desea agregar de fondo con colores aleatorios, y luego haga clic en el OK del botón.
Ahora verá que todas las celdas en el rango especificado están llenas de diferentes colores al azar. Vea la captura de pantalla a continuación:
Agregue aleatoriamente color de fondo / relleno para celdas con Kutools para Excel
En algunos casos, es posible que deba agregar color de fondo a las celdas seleccionadas al azar en un rango específico. Para hacerlo, puede probar Kutools para Excel Ordenar rango aleatoriamente utilidad y luego agregue color de fondo para estas celdas aleatorias.
Kutools for Excel - Equipado con más de 300 herramientas esenciales para Excel. ¡Disfrute de una prueba GRATUITA de 30 días con todas las funciones sin necesidad de tarjeta de crédito! ¡Descargar ahora!
Paso 1: Seleccione el rango donde desea encontrar celdas al azar y agregue color de fondo.
Paso 2: haga clic en Kutools > Gama de Colores > Ordenar rango aleatoriamente.
Paso 3: en el cuadro de diálogo de apertura Ordenar rango aleatorio, vaya a Seleccione pestaña, escriba un número en la No. de celda (s) para seleccionar casilla, marcar Seleccionar celdas aleatorias opción, y haga clic en OK botón. Vea la captura de pantalla a continuación:
Paso 4: Ahora el número especificado de celdas se selecciona aleatoriamente en el rango especificado. Luego haga clic en el flecha además de la color de relleno botón de la Inicio pestaña y seleccione un color de fondo de la lista desplegable.
Ahora verá que el color de fondo se agrega a las celdas seleccionadas al azar como se muestra a continuación:
Kutools for Excel - Potencia Excel con más de 300 herramientas esenciales. ¡Disfrute de una prueba GRATUITA de 30 días con todas las funciones sin necesidad de tarjeta de crédito! Consíguelo ahora
Demostración: agregue aleatoriamente color de fondo / relleno para celdas con Kutools para Excel
Artículos relacionados:
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!