Excel: Si el color de la fuente es rojo, entonces devuelve un texto específico u otras operaciones
¿Cómo podrías devolver un texto específico si el color de la fuente es rojo en otra celda como se muestra en la captura de pantalla a continuación? En este artículo, presentaré algunos trucos para realizar ciertas operaciones basadas en el texto con fuente roja en Excel.

Si el color de la fuente es rojo, entonces devuelve un texto específico en otra celda
Para devolver un texto específico si el color de la fuente es rojo en otra celda, por favor haz lo siguiente:
1. Presiona simultáneamente las teclas Alt+ F11 para abrir la ventana de Microsoft Visual Basic for Applications.
2. Luego, haz clic en Insertar > Módulo, copia y pega el siguiente código VBA en la ventana.
Código VBA: Si el color de la fuente es rojo, entonces devuelve un texto específico
Function FontColorisRed(Rng As Range)
'Updateby ExtendOffice
Application.Volatile
If Rng.Font.ColorIndex = 3 Then
FontColorisRed = "Fail"
Else
FontColorisRed = "Pass"
End If
End Function
3. Luego, cierra la ventana del código e introduce esta fórmula: =FontColorISRed(B2), y luego arrastra el controlador de relleno hacia abajo para obtener los demás resultados, ver captura de pantalla:

Descubre la Magia de Excel con Kutools AI
- Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
- Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
- Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
- Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
- Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Si el color de la fuente es rojo, entonces resalta la celda
Si deseas resaltar las celdas basándote en la fuente roja, por favor haz lo siguiente:
1. Presiona simultáneamente las teclas Alt+ F11 para abrir la ventana de Microsoft Visual Basic for Applications.
2. Luego, haz clic en Insertar > Módulo, copia y pega el siguiente código VBA en la ventana.
Código VBA: Si el color de la fuente es rojo, entonces resalta la celda
Function HighlightRedFont(pRg As Range) As Boolean
'Updateby ExtendOffice
Dim xRg As Range
Dim xBol As Boolean
xBol = False
For Each xRg In pRg
If xRg.Font.Color = vbRed Then
xBol = True
End If
Next
HighlightRedFont = xBol
End Function
3. Y luego, cierra la ventana del código, ve a hacer clic en Inicio > Formato condicional > Nueva regla, ver captura de pantalla:
4. En el cuadro de diálogo Nueva regla de formato que aparece, realiza las siguientes operaciones:
- Haz clic en Usar una fórmula para determinar qué celdas formatear en el cuadro de lista Seleccionar un tipo de regla;
- Introduce esta fórmula =highlightredfont(B2) en el cuadro de texto Formatear valores donde esta fórmula es verdadera;
- Luego, haz clic en el botón Formato.
5. En el cuadro de diálogo Formato de celdas, bajo la pestaña Relleno, elige un color que desees usar para resaltar la celda, ver captura de pantalla:
6. Y luego, haz clic en Aceptar > Aceptar para cerrar los cuadros de diálogo. Y ahora, las celdas con fuente roja están resaltadas de inmediato, ver captura de pantalla:
Si el color de la fuente es rojo, entonces cambia el color de la fuente
A veces, puede que quieras cambiar la fuente roja a otro color de fuente, aquí hablaré sobre dos métodos para lograrlo.
Si el color de la fuente es rojo, entonces cambia el color de la fuente con la función Buscar y Reemplazar
Para cambiar el color de fuente roja a otro, la función Buscar y Reemplazar en Excel puede ayudarte, por favor sigue los siguientes pasos:
1. Selecciona el rango de datos en el que deseas cambiar el color de la fuente, y luego presiona Ctrl + H para abrir el cuadro de diálogo Buscar y Reemplazar. En el cuadro de diálogo abierto, haz clic en el botón Opciones>>, ver captura de pantalla:
2. En el cuadro de diálogo expandido, realiza las siguientes operaciones:
- Deja los cuadros Buscar y Reemplazar en blanco;
- En el lado derecho del campo Buscar, selecciona Formato > Elegir formato desde celda, y haz clic en una celda con fuente roja;
- Luego, en el lado derecho del campo Reemplazar con, selecciona Formato > Formato para ir al cuadro de diálogo Formato de reemplazo.
3. En el cuadro de diálogo Formato de reemplazo, bajo la pestaña Fuente, elige un color al que deseas cambiar desde la lista desplegable Color, ver capturas de pantalla:
4. Luego, haz clic en Aceptar para cerrar el cuadro de diálogo Formato de reemplazo, y ahora, haz clic en el botón Reemplazar todo en el cuadro de diálogo Buscar y Reemplazar, todas las celdas con fuente roja se reemplazan con el color de fuente que especificaste, ver captura de pantalla:
Si el color de la fuente es rojo, entonces cambia el color de la fuente con una característica útil
Si tienes Kutools para Excel, con su función Seleccionar celdas con formato, puedes seleccionar las celdas con fuente roja, y luego cambiar el color de la fuente según sea necesario lo más rápido posible.
Después de instalar Kutools para Excel, por favor haz lo siguiente:
1. Selecciona el rango de datos que deseas usar, y luego, haz clic en Kutools > Seleccionar > Seleccionar celdas con formato, ver captura de pantalla:
2. En el cuadro de diálogo Seleccionar celdas con formato, haz clic en el botón Elegir formato desde celda. Y luego, selecciona una celda con fuente roja, todos los atributos de esta celda se muestran en el cuadro de lista de abajo. Si deseas seleccionar todas las celdas con exactamente el mismo formato de la celda base, marca todas las opciones de atributos; Si solo quieres seleccionar las celdas con fuente roja, desmarca todos los demás atributos excepto la casilla de verificación Color de fuente. Ver captura de pantalla:
3. Luego, haz clic en el botón Aceptar, y en el cuadro de diálogo emergente, haz clic en Sí, ver captura de pantalla:
4. Todas las celdas con fuente roja se seleccionan de inmediato, y luego, puedes especificar un color de fuente para cambiar la fuente roja según sea necesario. Ver captura de pantalla:
Las Mejores Herramientas de Productividad para Office
Kutools para Excel resuelve la mayoría de tus problemas y aumenta tu productividad en un 80%
- Barra de Fórmulas Super (editar fácilmente múltiples líneas de texto y fórmulas); Diseño de Lectura (leer y editar fácilmente grandes cantidades de celdas); Pegar en Rango Filtrado...
- Combinar Celdas/Filas/Columnas manteniendo los datos; Dividir contenido de celdas; Combinar filas duplicadas y Sumar/Promediar... Prevenir celdas duplicadas; Comparar rangos...
- Seleccionar filas duplicadas o únicas; Seleccionar filas en blanco (todas las celdas están vacías); Búsqueda Avanzada y Búsqueda Difusa en muchos libros de trabajo; Selección Aleatoria...
- Copia Exacta de múltiples celdas sin cambiar la referencia de la fórmula; Crear automáticamente referencias a múltiples hojas; Insertar viñetas, casillas de verificación y más...
- Favoritos e inserción rápida de fórmulas, rangos, gráficos e imágenes; Encriptar celdas con contraseña; Crear lista de correo y enviar correos electrónicos...
- Extraer texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir estadísticas de página; Convertir entre el contenido de las celdas y los comentarios...
- Super Filtro (guardar y aplicar esquemas de filtro a otras hojas); Clasificación avanzada por mes/semana/día, frecuencia y más; Filtro especial por negrita, cursiva...
- Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión masiva de xls, xlsx y PDF...
- Agrupación de Tabla Dinámica por número de semana, día de la semana y más... Mostrar celdas desbloqueadas, bloqueadas por diferentes colores; Resaltar celdas que tienen fórmula/nombre...

- Habilitar edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abrir y crear varios documentos en nuevas pestañas de la misma ventana, en lugar de en ventanas nuevas.
- ¡Aumenta tu productividad en un 50%, y reduce cientos de clics del ratón cada día!
