Excel VBA: Lista de Códigos ColorIndex y Colores RGB

Lista de Códigos ColorIndex VBA

Cuando se utiliza VBA para codificar el Colorindex (o color de fondo) de una celda es útil saber qué número entero equivale a qué color. Abajo hay una imagen de referencia que muestra el color y lista su respectivo Colorindex. Paleta de Colores VBA

---

Aquí está el código para hacer uno para usted, o simplemente marcar esta página:

Sub ColorRef()

Dim x As Integer

For x = 1 To 56
  If x < Then
    Cells(x, 1).Interior.ColorIndex = x
    Cells(x, 2) = x
  Else
    Cells(x - 28, 3).Interior.ColorIndex = x
    Cells(x - 28, 4) = x
  End If
Next x

End Sub

Ejemplos de VBA ColorIndex

Establecer el Color de Fondo de la Celda

Este ejemplo establece el color de fondo de la celda.

Range("A1").Interior.ColorIndex = 6

Establecer el Color de Fuente de la Celda

Este ejemplo establece el color de la fuente de la celda.

Range("A1").Font.ColorIndex = 5

Establecer el Color de los Bordes de la Celda

Este ejemplo establece el color del borde de la celda.

Range("A1").Borders.ColorIndex = 5

Obtener el Color de Fondo de la Celda

Este ejemplo obtiene el color de fondo de la celda y lo asigna a una variable Integer.

Dim col as integer

col = Range("A1").Interior.ColorIndex

Establecer el Color de Fondo de una Celda al Color de Otra Celda

Este ejemplo establece un color de celda igual a otro color de celda.

Range("A1").Interior.ColorIndex  = Range("B1").Interior.ColorIndex

Propiedad 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:

1. vbColor
2. RGB Colors

Los discutiremos a continuación:

vbColor

vbColor es la forma más fácil de establecer colores en VBA. Sin embargo, también es la menos flexible. Para establecer un código de color usando vbColor use la tabla de abajo:

 

Sin embargo, como puede ver en la tabla, sus opciones son extremadamente limitadas.

Establecer el Color de Fondo de la Celda

Range("A1").Interior.Color = vbYellow

Establecer el Color de la Fuente de la Celda

Range("A1").Font.Color = vbAzul

Establecer el Color de los bordes de las Celdas

Range("A1").Borders.Color = vbRed

Establecer el Color de Fondo de una Celda al Color de Otra Celda

Range("A1").Color.Interior = Range("B1").Color.Interior

Colores RGB

RGB son las siglas de Red Green Blue (Rojo Verde Azul). Estos son los tres colores primarios que pueden combinarse para producir cualquier otro color. Al introducir los colores como RGB, introduzca un valor entre 0 y 255 para cada código de color.

He aquí un ejemplo:

Range("A1").Color.interior = RGB(255,255,0)

Arriba hemos puesto 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 cambio, podemos establecer el color de la fuente de la celda en púrpura:

Range("A1").Color.Interior = RGB(128,0,128)

Existen numerosas herramientas en línea para encontrar el código RGB del color deseado(aquí hay una).

Lista de Códigos ColorIndex y Colores RGB en Access VBA

Access utiliza formularios para mostrar datos. Puede utilizar 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.

Private Sub cmdSave_Click()
'cambiar el color de fondo del botón de guardar cuando se guarda el registro.
   DoCmd.RunCommand acCmdSaveRecord
   cmdSave.BackColor = vbGreen
End Sub