una - Colores de fondo de múltiples celdas en hojas de cálculo de Excel

excel colorear celda si cumple condicion

Question

Excel tiene una opción de Formato condicional ... en el menú Formato que le permite cambiar el estilo / color / fuente / lo que sea de una celda dependiendo de su valor. Pero solo permite tres condiciones.

¿Cómo puedo hacer que Excel muestre, por ejemplo, seis colores de fondo de celda diferentes según el valor de la celda? (Por ejemplo, haga que la celda se vuelva roja si el valor es "Rojo", y azul si es "Azul", etc.)

Answer 1

Deberá escribir algo en VBA.

Vea el ejemplo aquí: Get Around supera el límite de los criterios 3 en el formato condicional :

Private Sub Worksheet_Change(ByVal Target As Range)

Dim icolor As Integer

    If Not Intersect(Target, Range("A1:A10")) is Nothing Then

        Select Case Target

            Case 1 To 5
                icolor = 6
            Case 6 To 10
                icolor = 12
            Case 11 To 15
                icolor = 7
            Case 16 To 20
                icolor = 53
            Case 21 To 25
                icolor = 15
            Case 26 To 30
                icolor = 42
            Case Else
                ''Whatever
        End Select

        Target.Interior.ColorIndex = icolor
    End If
End Sub

Answer 2

Puede usar macros de VBA para hacer esto ...

aquí hay una macro de vba que podría ser mejor si se necesitan muchos casos http://chandoo.org/wp/2008/10/14/more-than-3-conditional-formats-in-excel/

necesita preformatear ''n'' celdas con la forma en que desea formatear todo su rango. y luego usa la macro en esa url para obtener el efecto.

Answer 3

pon esto en un módulo en tu proyecto de VBA. A continuación, puede resaltar un rango en una hoja y ejecutar el sub desde la opción de menú Herramientas> Macro> Macros para colorear cada celda en el rango seleccionado.

Public Sub ColorCells()

Dim cell, rng As Range
Dim color As Integer
Dim sheet As Worksheet

Application.ScreenUpdating = False
Application.StatusBar = "Coloring Cells"

    Set rng = Application.Selection
    Set sheet = Application.ActiveSheet

For Each cell In rng.cells

        Select Case Trim(LCase(cell))

            Case "blue"

                color = 5

            Case "red"

                color = 3

            Case "yellow"

                color = 6

            Case "green"

                color = 4

            Case "purple"

                color = 7

            Case "orange"

                color = 46

            Case Else

                color = 0
        End Select

    sheet.Range(cell.Address).Interior.ColorIndex = color

Next cell

Application.ScreenUpdating = True
Application.StatusBar = "Ready"

End Sub

Si los usuarios ingresan nuevos nombres de colores en las celdas, puede poner esto en el código de la hoja en el proyecto de VBA para colorear las celdas a medida que el usuario ingresa los nombres de los colores en las celdas

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.cells.Count > 1 Then Exit Sub

Dim color As Integer

        Select Case Trim(LCase(Target))

            Case "blue"

                color = 5

            Case "red"

                color = 3

            Case "yellow"

                color = 6

            Case "green"

                color = 4

            Case "purple"

                color = 7

            Case "orange"

                color = 46

            Case Else

                color = 0

        End Select

Target.Interior.ColorIndex = color

End Sub

EDITAR: Se agregó la función Recortar alrededor de la expresión de la declaración de caso para probar, de modo que los espacios iniciales / finales accidentales en las celdas se ignoran :)

Answer 4

Excel 2007 permite más de tres condiciones. Citando de esta página de Microsoft :

EDITAR: Ah, hay una "característica" en el código de enlace: los paréntesis en un enlace citado entre paréntesis no se manejan correctamente. Ese enlace es: http://msdn.microsoft.com/en-us/library/bb286672(office.11).aspx

Otros beneficios de los cambios al formato condicional en Excel 2007 son la capacidad de especificar más de tres condiciones, reordenar condiciones y tener más de una condición resuelta en Verdadero.

De otra manera. estás atascado con alternativas desordenadas como se describe, me temo.