Lista de códigos de índice de color de VBA
Cuando se usa VBA para codificar el índice de color (o el color de fondo) de una celda, es útil saber qué número entero será igual a qué color. A continuación se muestra una imagen de referencia que muestra el color y enumera su respectivo índice de color. alias Paleta de colores VBA
Aquí está el código para hacer uno para usted, o simplemente agregue esta página a marcadores:
| 123456789101112131415 | Sub ColorRef ()Dim x como enteroPara x = 1 a 56Si x <EntoncesCeldas (x, 1) .Interior.ColorIndex = xCeldas (x, 2) = xDemásCeldas (x - 28, 3) .Interior.ColorIndex = xCeldas (x - 28, 4) = xTerminara siSiguiente xEnd Sub |
Ejemplos de VBA ColorIndex
Establecer el color de fondo de la celda
| 1 | Rango ("A1"). Interior.ColorIndex = 6 |
Establecer color de fuente de celda
| 1 | Rango ("A1"). Font.ColorIndex = 5 |
Establecer el color de los bordes de la celda
| 1 | Rango ("A1"). Borders.ColorIndex = 5 |
Obtener el índice de color de fondo de la celda
| 123 | Dim col como enterocol = Rango ("A1"). Interior.ColorIndex |
Establecer un color de fondo de celda en el color de otra celda
| 1 | Rango ("A1"). Interior.ColorIndex = Rango ("B1"). Interior.ColorIndex |
Propiedad de color de VBA
En lugar de utilizar la propiedad ColorIndex de Excel / VBA, puede utilizar la propiedad Color. La propiedad Color toma dos tipos de entrada:
- vbColor
- Colores RGB
Discutiremos estos a continuación:
Color de VB
VB Color es la forma más fácil de establecer colores en VBA. Sin embargo, también es el menos flexible. Para establecer un código de color usando vbColor, use la siguiente tabla:
Sin embargo, como puede ver en la tabla, sus opciones son extremadamente limitadas.
Establecer el color de fondo de la celda
| 1 | Rango ("A1"). Interior.Color = vbYellow |
Establecer color de fuente de celda
| 1 | Rango ("A1"). Font.Color = vbBlue |
Establecer el color de los bordes de la celda
| 1 | Rango ("A1"). Borders.Color = vbRed |
Establecer un color de fondo de celda en el color de otra celda
| 1 | Rango ("A1"). Interior.Color = Rango ("B1"). Interior.Color |
Colores RGB
RGB son las siglas de Red Green Blue. Estos son los tres colores primarios que se pueden combinar para producir cualquier otro color. Al ingresar colores como RGB, ingrese un valor entre 0 y 255 para cada código de color.
Aquí tienes un ejemplo:
| 1 | Rango ("A1"). Interior.Color = RGB (255,255,0) |
Arriba hemos establecido Rojo = 255 (valor máximo), Verde = 255 (valor máximo) y Azul = 0 (valor mínimo). Esto establece el color de fondo de la celda en Amarillo.
En su lugar, podemos establecer el color de la fuente de la celda en púrpura:
| 1 | Rango ("A1"). Interior.Color = RGB (128,0,128) |
Existen numerosas herramientas en línea para encontrar el código RGB para el color deseado (aquí hay uno).
Lista de códigos ColorIndex y colores RGB en Access VBA
Access usa formularios para mostrar datos. Puede usar los códigos ColorIndex para cambiar mediante programación el color de fondo y el color de primer plano de los objetos en sus formularios de Access.
| 12345 | Sub privado cmdSave_Click ()'cambia el color de fondo del botón guardar cuando se guarda el registro.DoCmd.RunCommand acCmdSaveRecordcmdSave.BackColor = vbGreenEnd Sub |
