Autoformato mas de 3 condiciones

Gracias Mario por tu ayuda.
Sigo teniendo problemas. El fondo no se pone del color que quiero sino la
fuente.
Y además, no tengo ni idea de que número corresponde a que color.
Siento decirte también que las condiciones han cambiado.
Ahora son:

entre 1 y -1 sin color (blanco)
entre 1 y 2 rojo claro o rosa
entre -1 y -2 verde claro
mas de 2 rojo
menos de -2 verde

como ves ahora son cuatro colores

Espero noticias tuyas
Muchísimas gracias




"Mario López" escribió:

J:

abrí el editor de VBA y agregá el siguiente método en la hoja con los datos a colorear:

-
Private Sub Worksheet_Change(ByVal Target As Excel.Range)

Dim r As Range

Application.EnableEvents = False

Set r = Application.Intersect(Range("B2:B10"), Target) : Rem acá iría el rango de celdas con el "formato condicional"
If Not r Is Nothing Then
Select Case Target.Value
' Acá indicarías cada uno de los valores del rango y el color del mismo en formato RGB
Case Is > 0.07
Target.Font.Color = RGB(255, 0, 0): Rem Color1
Case Is > 0.05
Target.Font.Color = RGB(200, 0, 0): Rem Color2
Case Is > 0.025
Target.Font.Color = RGB(128, 0, 0): Rem Color3
'case ...
Case Else
Target.Font.ColorIndex = xlAutomatic
End Select
End If

Application.EnableEvents = True

End Sub
-

HTH
Mario

On Thu, 2 Apr 2009 08:19:03 -0700, J wrote:

>Muchas gracias Mario. Pero no entiendo tu respuesta "Worksheet"? Font. color??
>me lo traduces por favor??
>
>Muchas gracias
>J
>
>"Mario López" escribió:
>
>> J:
>>
>> en ese caso podés usar el evento WorkSheet_Change y
>> modificar el color de acuerdo al contenido de la celda
>> con Font.Color
>>
>> HTH
>> Mario
>>
>> On Thu, 2 Apr 2009 00:45:17 -0700, J wrote:
>>
>> >
>> >NO. Ya lo probé Xavier. Además son más condiciones.
>> >
>> >0.07
>> >0.05
>> >0.025
>> >0
>> >-0.025
>> >-0.05
>> >-0.07
>> >
>> >Quiero que:
>> >x>0.07 el fondo de la celda se tilde roja
>> >0.05>ó=x<ó=0.07 el fondo de la celda amarillo
>> >0.025>ó=x<0.05 el fondo verde
>> >entre 0.025 y -0.025 fondo blanco (el que ya viene predeterminado)
>> >x>-0.07 el fondo de la celda se tilde roja
>> >-0.05>ó=x<ó=-0.07 el fondo de la celda amarillo
>> >-0.025>ó=x<-0.05 el fondo verde
>> >
>> >Prueba y verás como no es posible
>> >Gracias por tu ayuda
>> >J
>> >
>> >
>> >
>> >
>> >
>> >"Xavier Budet Graco" escribió:
>> >
>> >> Hola "J", busca menú "Formato" y en este "Formato condicional". Allí puedes configurar lo que precisas. Son tres posibilidades más la de origen "fondo blanco", o sea que no has de tener problemas. (El Verde "Valor de la celda" entre 0,01 y 0,05)
>> >>
>> >> Saludos,
>> >>
>> >> Xavier
>> >>
>> >> Quitar MAC para contestar. Gracias.
>> >>
>> >>
>> >> "J" escribió en el mensaje news:
>> >> > Tienes toda la razón Xavier. Voy a puntualizar más:
>> >> > 1. El signo >, = ó < significan "mayor a" "igual a" "menor a", y NO formato
>> >> > condicional
>> >> > 2. EL color que quiero que aparezca es el de fondo y NO los valores en sí.
>> >> > 3. Uso la versión de 2003 como bien has deducido.
>> >> >
>> >> > De todas formas Xavier no entiendo muy bien tu respuesta. Lo siento, pero
>> >> > mis conocimientos sobre excel son limitados.
>> >> > Espero que con la información que te escribo te sirva un poco más.
>> >> > Te agradezco sinceramente tu ayuda.
>> >> > Saludos
>> >> > J
>> >> > "Xavier Budet Graco" escribió:
>> >> >
>> >> >> Hola "J", creo que hay más de una inexactitud en tu pregunta, voy a ver si la he entendido.
>> >> >> 1º Supongo que por "> Lo he intentado con el autoformato" quieres decir "Formato condicional"
>> >> >> 2º No especificas si el color lo ha de tener el fondo o los valores...
>> >> >> 3º No especificas la versión que utilizas...
>> >> >>
>> >> >> Si es el fondo (parece serlo porque texto "Amarillo" sobre fondo blanco sería de difícil lectura) no tienes ningún problema porque se trata de colorear los mayores de 0,01 con tres colores que en la versión de Excel que utilizas (por la pregunta parece ser que NO es la 2007) puedes hacerlo.
>> >> >>
>> >> >> Si se trata del valor coloreado sobre fondo sin color, entonces podrías hacer que un valor fuera el "Negro" (por defecto) y los otros tres te permite hacerlo.
>> >> >>
>> >> >> Como yo utilizo la versión 2007 no sé si por defecto se puede poner un color de "tus" cuatro y los otros tres con el condicional, lo siento pero no puedo probrarlo. (con la 2007 se pueden hacer 64 combinaciones)
>> >> >>
>> >> >> Saludos,
>> >> >>
>> >> >> Xavier
>> >> >>
>> >> >> Quitar MAC para contestar. Gracias.
>> >> >>
>> >> >>
>> >> >> "J" escribió en el mensaje news:
>> >> >> > Hola a todos.
>> >> >> > Tengo un pequeño problemilla con lo siguiente.
>> >> >> > Quiero asociar colores al rango de datos que veis abajo. Es decir, si en la
>> >> >> > tabla aparece el número 0.04 en la casilla se señale automaticamente el color
>> >> >> > amarillo. Si sale 4 se marque rojo, etc... Es fundamental que sea automático.
>> >> >> > Los datos que salen en la tabla (para que os hagais una idea) pueden ser por
>> >> >> > ejemplo: -0.06, 0.008, -0.01, 0.045, 0.12, 0.00, 0.2, etc.
>> >> >> >
>> >> >> > rojo >1
>> >> >> > amarillo > 0.05,< ó =1
>> >> >> > verde < ó = 0.05
>> >> >> > sin color(blanco) < ó = 0.01
>> >> >> >
>> >> >> > Lo he intentado con el autoformato, pero está limitado a tres condiciones y
>> >> >> > no puedo hacerlo.
>> >> >> > Muchas gracias por vuestra ayuda.
>> >> >> > Salu2
>> >> >>
>> >>
>>

J:

bueno, en ese caso cambiás

Target.Font.Color por Target.Interior.ColorIndex

Para armar las condiciones solamente tenés que crear una línea Case por cada condición

ej:

Case -1 To 1
Target.Interior.ColorIndex = xlAutomatic
Case 1 To 2
Target.Interior.ColorIndex = 3 :rem Rojo


el número que va a la derecha de ColorIndex lo podés ver pulsando F1 sobre ColorIndex.

HTH
Mario

On Mon, 6 Apr 2009 05:26:02 -0700, J wrote:

Gracias Mario por tu ayuda.
Sigo teniendo problemas. El fondo no se pone del color que quiero sino la
fuente.
Y además, no tengo ni idea de que número corresponde a que color.
Siento decirte también que las condiciones han cambiado.
Ahora son:

entre 1 y -1 sin color (blanco)
entre 1 y 2 rojo claro o rosa
entre -1 y -2 verde claro
mas de 2 rojo
menos de -2 verde

como ves ahora son cuatro colores

Espero noticias tuyas
Muchísimas gracias




"Mario López" escribió:

J:

abrí el editor de VBA y agregá el siguiente método en la hoja con los datos a colorear:

-
Private Sub Worksheet_Change(ByVal Target As Excel.Range)

Dim r As Range

Application.EnableEvents = False

Set r = Application.Intersect(Range("B2:B10"), Target) : Rem acá iría el rango de celdas con el "formato condicional"
If Not r Is Nothing Then
Select Case Target.Value
' Acá indicarías cada uno de los valores del rango y el color del mismo en formato RGB
Case Is > 0.07
Target.Font.Color = RGB(255, 0, 0): Rem Color1
Case Is > 0.05
Target.Font.Color = RGB(200, 0, 0): Rem Color2
Case Is > 0.025
Target.Font.Color = RGB(128, 0, 0): Rem Color3
'case ...
Case Else
Target.Font.ColorIndex = xlAutomatic
End Select
End If

Application.EnableEvents = True

End Sub
-

HTH
Mario

On Thu, 2 Apr 2009 08:19:03 -0700, J wrote:

>Muchas gracias Mario. Pero no entiendo tu respuesta "Worksheet"? Font. color??
>me lo traduces por favor??
>
>Muchas gracias
>J
>
>"Mario López" escribió:
>
>> J:
>>
>> en ese caso podés usar el evento WorkSheet_Change y
>> modificar el color de acuerdo al contenido de la celda
>> con Font.Color
>>
>> HTH
>> Mario
>>
>> On Thu, 2 Apr 2009 00:45:17 -0700, J wrote:
>>
>> >
>> >NO. Ya lo probé Xavier. Además son más condiciones.
>> >
>> >0.07
>> >0.05
>> >0.025
>> >0
>> >-0.025
>> >-0.05
>> >-0.07
>> >
>> >Quiero que:
>> >x>0.07 el fondo de la celda se tilde roja
>> >0.05>ó=x<ó=0.07 el fondo de la celda amarillo
>> >0.025>ó=x<0.05 el fondo verde
>> >entre 0.025 y -0.025 fondo blanco (el que ya viene predeterminado)
>> >x>-0.07 el fondo de la celda se tilde roja
>> >-0.05>ó=x<ó=-0.07 el fondo de la celda amarillo
>> >-0.025>ó=x<-0.05 el fondo verde
>> >
>> >Prueba y verás como no es posible
>> >Gracias por tu ayuda
>> >J
>> >
>> >
>> >
>> >
>> >
>> >"Xavier Budet Graco" escribió:
>> >
>> >> Hola "J", busca menú "Formato" y en este "Formato condicional". Allí puedes configurar lo que precisas. Son tres posibilidades más la de origen "fondo blanco", o sea que no has de tener problemas. (El Verde "Valor de la celda" entre 0,01 y 0,05)
>> >>
>> >> Saludos,
>> >>
>> >> Xavier
>> >>
>> >> Quitar MAC para contestar. Gracias.
>> >>
>> >>
>> >> "J" escribió en el mensaje news:
>> >> > Tienes toda la razón Xavier. Voy a puntualizar más:
>> >> > 1. El signo >, = ó < significan "mayor a" "igual a" "menor a", y NO formato
>> >> > condicional
>> >> > 2. EL color que quiero que aparezca es el de fondo y NO los valores en sí.
>> >> > 3. Uso la versión de 2003 como bien has deducido.
>> >> >
>> >> > De todas formas Xavier no entiendo muy bien tu respuesta. Lo siento, pero
>> >> > mis conocimientos sobre excel son limitados.
>> >> > Espero que con la información que te escribo te sirva un poco más.
>> >> > Te agradezco sinceramente tu ayuda.
>> >> > Saludos
>> >> > J
>> >> > "Xavier Budet Graco" escribió:
>> >> >
>> >> >> Hola "J", creo que hay más de una inexactitud en tu pregunta, voy a ver si la he entendido.
>> >> >> 1º Supongo que por "> Lo he intentado con el autoformato" quieres decir "Formato condicional"
>> >> >> 2º No especificas si el color lo ha de tener el fondo o los valores...
>> >> >> 3º No especificas la versión que utilizas...
>> >> >>
>> >> >> Si es el fondo (parece serlo porque texto "Amarillo" sobre fondo blanco sería de difícil lectura) no tienes ningún problema porque se trata de colorear los mayores de 0,01 con tres colores que en la versión de Excel que utilizas (por la pregunta parece ser que NO es la 2007) puedes hacerlo.
>> >> >>
>> >> >> Si se trata del valor coloreado sobre fondo sin color, entonces podrías hacer que un valor fuera el "Negro" (por defecto) y los otros tres te permite hacerlo.
>> >> >>
>> >> >> Como yo utilizo la versión 2007 no sé si por defecto se puede poner un color de "tus" cuatro y los otros tres con el condicional, lo siento pero no puedo probrarlo. (con la 2007 se pueden hacer 64 combinaciones)
>> >> >>
>> >> >> Saludos,
>> >> >>
>> >> >> Xavier
>> >> >>
>> >> >> Quitar MAC para contestar. Gracias.
>> >> >>
>> >> >>
>> >> >> "J" escribió en el mensaje news:
>> >> >> > Hola a todos.
>> >> >> > Tengo un pequeño problemilla con lo siguiente.
>> >> >> > Quiero asociar colores al rango de datos que veis abajo. Es decir, si en la
>> >> >> > tabla aparece el número 0.04 en la casilla se señale automaticamente el color
>> >> >> > amarillo. Si sale 4 se marque rojo, etc... Es fundamental que sea automático.
>> >> >> > Los datos que salen en la tabla (para que os hagais una idea) pueden ser por
>> >> >> > ejemplo: -0.06, 0.008, -0.01, 0.045, 0.12, 0.00, 0.2, etc.
>> >> >> >
>> >> >> > rojo >1
>> >> >> > amarillo > 0.05,< ó =1
>> >> >> > verde < ó = 0.05
>> >> >> > sin color(blanco) < ó = 0.01
>> >> >> >
>> >> >> > Lo he intentado con el autoformato, pero está limitado a tres condiciones y
>> >> >> > no puedo hacerlo.
>> >> >> > Muchas gracias por vuestra ayuda.
>> >> >> > Salu2
>> >> >>
>> >>
>>

On 6 abr, 10:39, Mario López wrote:

J:

bueno, en ese caso cambiás

Target.Font.Color por Target.Interior.ColorIndex

Para armar las condiciones solamente tenés que crear una línea Case por cada condición

ej:

Case -1 To 1
        Target.Interior.ColorIndex = xlAutomatic
Case 1 To 2
        Target.Interior.ColorIndex =3         :rem Rojo


el número que va a la derecha de ColorIndex lo podés ver pulsando F1 sobre ColorIndex.

HTH
Mario

 On Mon, 6 Apr 2009 05:26:02 -0700, J wrote:





>Gracias Mario por tu ayuda.
>Sigo teniendo problemas. El fondo no se pone del color que quiero sino la
>fuente.
>Y además, no tengo ni idea de que número corresponde a que color.
>Siento decirte también que las condiciones han cambiado.
>Ahora son:

>entre 1 y -1 sin color (blanco)
>entre 1 y 2 rojo claro o rosa
>entre -1 y -2 verde claro
>masde 2 rojo
>menos de -2 verde

>como ves ahora son cuatro colores

>Espero noticias tuyas
>Muchísimas gracias

>"Mario López" escribió:

>> J:

>> abrí el editor de VBA y agregá el siguiente método en la hoja con los datos a colorear:

>> -
>> Private Sub Worksheet_Change(ByVal Target As Excel.Range)

>> Dim r As Range

>> Application.EnableEvents = False

>> Set r = Application.Intersect(Range("B2:B10"), Target)       : Rem acá iría el rango de celdas con el "formatocondicional"
>> If Not r Is Nothing Then
>>     Select Case Target.Value
>>    ' Acá indicarías cada uno de los valores del rango y el color del mismo enformatoRGB
>>     Case Is > 0.07
>>         Target.Font.Color = RGB(255, 0, 0): Rem Color1
>>     Case Is > 0.05
>>         Target.Font.Color = RGB(200, 0, 0): Rem Color2
>>     Case Is > 0.025
>>         Target.Font.Color = RGB(128, 0, 0): Rem Color3
>>     'case ...
>>     Case Else
>>         Target.Font.ColorIndex = xlAutomatic
>>     End Select
>> End If

>> Application.EnableEvents = True

>> End Sub
>> -

>> HTH
>> Mario

>>  On Thu, 2 Apr 2009 08:19:03 -0700, J wrote:

>> >Muchas gracias Mario. Pero no entiendo tu respuesta "Worksheet"? Font. color??
>> >me lo traduces por favor??

>> >Muchas gracias
>> >J

>> >"Mario López" escribió:

>> >> J:

>> >> en ese caso podés usar el evento WorkSheet_Change y
>> >> modificar el color de acuerdo al contenido de la celda
>> >> con Font.Color

>> >> HTH
>> >> Mario

>> >>  On Thu, 2 Apr 2009 00:45:17 -0700, J wrote:

>> >> >NO. Ya lo probé Xavier. Además son más condiciones.

>> >> >0.07
>> >> >0.05
>> >> >0.025
>> >> >0
>> >> >-0.025
>> >> >-0.05
>> >> >-0.07

>> >> >Quiero que:
>> >> >x>0.07 el fondo de la celda se tilde roja
>> >> >0.05>ó=x<ó=0.07 el fondo de la celda amarillo
>> >> >0.025>ó=x<0.05 el fondo verde
>> >> >entre 0.025 y -0.025 fondo blanco (el que ya viene predeterminado)
>> >> >x>-0.07 el fondo de la celda se tilde roja
>> >> >-0.05>ó=x<ó=-0.07 el fondo de la celda amarillo
>> >> >-0.025>ó=x<-0.05 el fondo verde

>> >> >Prueba y verás como no es posible
>> >> >Gracias por tu ayuda
>> >> >J

>> >> >"Xavier Budet Graco" escribió:

>> >> >> Hola "J", busca menú "Formato" y en este "Formatocondicional". Allí puedes configurar lo que precisas. Son tres posibilidades más la de origen "fondo blanco", o sea que no has de tener problemas. (El Verde "Valor de la celda" entre 0,01 y 0,05)

>> >> >> Saludos,

>> >> >> Xavier
>> >> >>
>> >> >> Quitar MAC para contestar. Gracias.

>> >> >> "J" escribió en el mensajenews:
>> >> >> > Tienes toda la razón Xavier. Voy a puntualizar más:
>> >> >> > 1. El signo >, = ó < significan "mayor a" "igual a" "menor a", y NOformato
>> >> >> >condicional
>> >> >> > 2. EL color que quiero que aparezca es el de fondo y NO los valores en sí.
>> >> >> >3. Uso la versión de 2003 como bien has deducido.

>> >> >> > De todas formas Xavier no entiendo muy bien tu respuesta. Lo siento, pero
>> >> >> > mis conocimientos sobre excel son limitados.
>> >> >> > Espero que con la información que te escribo te sirva un poco más.
>> >> >> > Te agradezco sinceramente tu ayuda.
>> >> >> > Saludos
>> >> >> > J
>> >> >> > "Xavier Budet Graco" escribió:

>> >> >> >> Hola "J", creo que hay más de una inexactitud en tu pregunta, voy a ver si la he entendido.
>> >> >> >> 1º Supongo que por "> Lo he intentado con el autoformato" quieres decir "Formatocondicional"
>> >> >> >> 2º No especificas si el color lo ha de tener el fondo o los valores...
>> >> >> >> 3º No especificas la versión que utilizas...

>> >> >> >> Si es el fondo (parece serlo porque texto "Amarillo" sobre fondo blanco sería de difícil lectura) no tienes ningún problema porque se trata de colorear los mayores de 0,01 con tres colores que en la versión de Excel que utilizas (por la pregunta parece ser que NO es la 2007) puedes hacerlo.

>> >> >> >> Si se trata del valor coloreado sobre fondo sin color, entonces podrías hacer que un valor fuera el "Negro" (por defecto) y los otros tres te permite hacerlo.

>> >> >> >> Como yo utilizo la versión 2007 no sé si por defecto se puede poner un color de "tus" cuatro y los otros tres con elcondicional, lo siento pero no puedo probrarlo. (con la 2007 se pueden hacer 64 combinaciones)

>> >> >> >> Saludos,

>> >> >> >> Xavier
>> >> >> >>
>> >> >> >> Quitar MAC para contestar. Gracias.

>> >> >> >> "J" escribió en el mensajenews:
>> >> >> >> > Hola a todos.
>> >> >> >> > Tengo un pequeño problemilla con lo siguiente.
>> >> >> >> > Quiero asociar colores al rango de datos que veis abajo. Es decir, si en la
>> >> >> >> > tabla aparece el número 0.04 en la casilla se señale automaticamente el color
>> >> >> >> > amarillo. Si sale 4 se marque rojo, etc... Es fundamental que sea automático.
>> >> >> >> > Los datos que salen en la tabla (para que os hagais una idea) pueden ser por
>> >> >> >> > ejemplo: -0.06, 0.008, -0.01, 0.045, 0.12, 0.00, 0.2, etc.

>> >> >> >> > rojo           >1
>> >> >> >> > amarillo           > 0.05,< ó =1
>> >> >> >> > verde           < ó = 0.05
>> >> >> >> > sin color(blanco)  < ó = 0.01

>> >> >> >> > Lo he intentado con el autoformato, pero está limitado a tres condiciones y
>> >> >> >> > no puedo hacerlo.
>> >> >> >> > Muchas gracias por vuestra ayuda.
>> >> >> >> > Salu2- Ocultar texto de la cita -

- Mostrar texto de la cita -

QUERIA CONSULTARTE AL RESPECTO Autoformato mas de 3 condiciones. EN
BASE A ESE TRABAJO, EFECTUE LOS CAMBIOS PARA ADAPTARLO A MIS
NECESIDADES:
1) PERO NECESITO QUE LAS CONDICONALES SEAN NOMBRES (ACTIVO,
NEGOCIANDO, NULO) Y QUE CADA NOMMBRE SE REPRESENTE CON UN COLOR DE
CELDA (EN EL ULTIMO DE LOS CASOS, AL MENOS QUE SE COLOREE EL TEXTO.
A) NO LOGRO COMPAGINARLO DE MANERA QUE ME FUNCIONE.
B) NO LOGRO ENCONTRAR EL RANGO EN RGB, QUE REPRESENTE EL COLOR
AMARILLO.
C) lOS DATOS QUE DEBE TOMARSE, INGRESAN A LA HOJA DE EXCEL POR
MEDIO DE UN FORMULARIO DE MACRO QUE VA DESPLAZANDO LAS FILAS HACIA
ABAJO. COMO HAGO PARA QUE EL COLOR ACOMPAÑE A LAS FILAS, Y PARA Q LOS
NUEVOS DATOS QUE INGRESEN, TOMEN EL COLOR ASIGNADO POR EL FORMATO
CONDICIONAL.
NUEVAMENTE TE AGRADEZCO TU GENTILEZA Y ME DISCULPO CON VOS POR LAS
MOLESTIAS CAUSADAS.
CORDIALMENTE
PABLO