En esta ocasión comparto una macro que permitirá a las versiones de Excel 2003 y anteriores, utilizar más de 3 opciones de formato condicional. Esto se hace mediante el constructor Select Case con el evento Change de la hoja activa. Código: '--------------------------------------------------------------------------------------- ' Procedure : Worksheet_Change ' Date : 24/04/2011 ' Purpose : Formato condicional con más de 3 condiciones en Excel 2003 (-) '--------------------------------------------------------------------------------------- ' Private Sub Worksheet_Change(ByVal Target As Range) On Error GoTo fin If Application.Intersect(Target, [A3:I21]) Is Nothing Then Exit Sub With ThisWorkbook.ActiveSheet Select Case Target Case .Range("K3").Value Target.Interior.ColorIndex = .Range("K3").Interior.ColorIndex Case .Range("K4").Value Target.Interior.ColorIndex = .Range("K4").Interior.ColorIndex Case .Range("K5").Value Target.Interior.ColorIndex = .Range("K5").Interior.ColorIndex Case .Range("K6").Value Target.Interior.ColorIndex = .Range("K6").Interior.ColorIndex Case .Range("K7").Value Target.Interior.ColorIndex = .Range("K7").Interior.ColorIndex Case .Range("K8").Value Target.Interior.ColorIndex = .Range("K8").Interior.ColorIndex Case .Range("K9").Value Target.Interior.ColorIndex = .Range("K9").Interior.ColorIndex Case .Range("K10").Value Target.Interior.ColorIndex = .Range("K10").Interior.ColorIndex Case .Range("K11").Value Target.Interior.ColorIndex = .Range("K11").Interior.ColorIndex Case .Range("K12").Value Target.Interior.ColorIndex = .Range("K12").Interior.ColorIndex Case Else Target.Interior.ColorIndex = xlColorIndexNone End Select End With Exit Sub fin: MsgBox "Intentaste borrar más de una celda a la vez. Debes de borrar celda por celda", vbCritical, "Error de borrado" End Sub Alex. https://exceleinfo.wordpress.com https://twitter.com/sergioacamposh

Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis Ingresar

JavaScript está desactivado. Para una mejor experiencia, por favor active JavaScript en su navegador antes de continuar.

Formato condicional más de 3 condiciones en Excel 2003

Autor del tema sergioacamposh
Fecha de inicio 25 Abr 2011

sergioacamposh

Member

25 Abr 2011

En esta ocasión comparto una macro que permitirá a las versiones de Excel 2003 y anteriores, utilizar más de 3 opciones de formato condicional. Esto se hace mediante el constructor Select Case con...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

Iniciar sesión o registrarme para responder aquí.

Temas similares

Pregunta

Formato condicional con más de 3 condiciones

Respuestas: 1

26 Feb 2008

galileogali

Pregunta

Macro formato condicional (más de 3 condiciones)

Respuestas: 11

23 Ago 2006

Fco. Javier

Resuelto

Formato condicional que no modifique formatos anteriores.

Respuestas: 15

29 Dic 2024

crengifo1726

Resuelto

Formato condicional a una imagen?

Respuestas: 2

19 Nov 2024

rikfabian

Pregunta

Mantener Formato Condicional al añadir fila

Respuestas: 6

11 Ago 2024

Xtamel

Pregunta

Macro con formato condicional

Respuestas: 5

9 Jul 2024

Txistorri007

Pregunta

Contar celdas de color con formato condicional o formulas

Respuestas: 7

20 Oct 2023

Dante Amor M

Resuelto

Copiar sólo relleno de celdas con formato condicional

Respuestas: 1

8 Sep 2023

FGV

Pregunta

Aplicar formato condicional a un rango si se cumple una condicion

Respuestas: 1

12 Ago 2023

hc3115

Pregunta

Aplicar formato condicional con Formula a un rango

Respuestas: 4

9 Ago 2023

MMarkuSS_AAureliuSS

Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Correo electrónico Enlace

Bienvenido a nuestro foro Excel 👋

Tenemos 135.000 usuarios registrados,
y 240.000 preguntas y respuestas Excel.

Primero 👉 regístrate gratis aquí 👈
para ver contenidos y descargas
sin restricciones!

Este sitio usa cookies para ayudar a personalizar el contenido, adaptar su experiencia y mantenerlo conectado si se registra.
Al continuar usando este sitio, usted está consintiendo nuestro uso de cookies.

Aceptar Saber más…

Volver

Arriba