¿Cómo poner las celdas en negrita si son mayores que cierto número en Excel?
Suponiendo que tiene un rango de números y le gustaría destacar algunas celdas con fuente en negrita si el valor de la celda es mayor que un cierto número, como 90, ¿qué puede hacer? Este artículo le mostrará tres métodos para lograrlo en detalle.
Ponga las celdas en negrita si son mayores que cierto número con formato condicional
Ponga las celdas en negrita si son mayores que cierto número con el código VBA
Haga las celdas en negrita si son mayores que cierto número con Kutools para Excel
Ponga las celdas en negrita si son mayores que cierto número con formato condicional
Puede aplicar la función de formato condicional para poner las celdas en negrita si el valor de las celdas es mayor que un cierto número en Excel. Haz lo siguiente.
1. Seleccione el rango de celdas en las que desea poner en negrita los números mayores que un número específico y luego haga clic en Formato condicional > Nueva regla bajo Inicio lengüeta. Ver captura de pantalla:
2. En el Nueva regla de formato cuadro de diálogo, debe:
3. En el Formato de celdas cuadro de diálogo, haga clic en Valientes existentes Estilo de fuente caja bajo Fuente pestaña, y luego haga clic en OK del botón.
4. Cuando devuelve el Nueva regla de formato cuadro de diálogo, haga clic en OK del botón.
Luego, todas las celdas mayores de 90 se formatean con fuente en negrita inmediatamente en el rango seleccionado.
Ponga las celdas en negrita si son mayores que cierto número con el código VBA
Además del método anterior, puede aplicar el código VBA para poner las celdas en negrita si son mayores que cierto número en Excel.
1. Prensa otro + F11 teclas simultáneamente para abrir el Microsoft Visual Basic para aplicaciones ventana.
2. En el Microsoft Visual Basic para aplicaciones ventana, haga clic recuadro > Módulo. Luego copie y pegue el código de VBA debajo en la ventana del Módulo.
Código de VBA: ponga las celdas en negrita si es mayor que cierto número
Sub BoldHighHours()
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, ActiveSheet.UsedRange)
If xRg Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
If VBA.IsNumeric(xCell.Value) Then _
xCell.Font.Bold = (xCell.Value > 90)
Next
Application.ScreenUpdating = xUpdate
End Sub
Note: En el código, el número 90 es el valor en el que debe poner las celdas en negrita. Cámbielo según sus propias necesidades.
3. Prensa F5 clave para ejecutar el código, en el Kutools for Excel cuadro de diálogo, seleccione el rango que necesita para dar formato a las celdas con fuente en negrita y luego haga clic en el OK del botón.
Luego, las celdas que superen el número 90 se formatean en negrita.
Haga las celdas en negrita si son mayores que cierto número con Kutools para Excel
La Seleccionar celdas específicas La utilidad de Kutools para Excel lo ayudará a seleccionar fácilmente las celdas que son mayores que cierto número en un rango específico a la vez, y luego puede formatearlas con fuente en negrita manualmente.
Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.
1. Seleccione el rango y luego haga clic en Kutools > Seleccione > Seleccionar celdas específicas. Ver captura de pantalla:
2. En el Seleccionar celdas específicas cuadro de diálogo, seleccione Celular opción en el Tipo de selección sección, y en la Tipo específico sección, seleccionar Más que en la lista desplegable, ingrese el número específico en el cuadro de texto y finalmente haga clic en el OK del botón.
3. Luego aparece un cuadro de diálogo para indicarle cuántas celdas están seleccionadas, haga clic en el OK botón. Ahora solo se seleccionan las celdas mayores de 90, siga seleccionando estas celdas y luego haga clic en el Valientes Botón debajo Inicio pestaña para ponerlos en negrita.
Si desea tener una prueba gratuita (30 días) de esta utilidad, haga clic para descargarloy luego vaya a aplicar la operación según los pasos anteriores.
Las mejores herramientas de productividad de oficina
Mejore sus habilidades de Excel con Kutools for Excel y experimente la eficiencia como nunca antes. Kutools for Excel ofrece más de 300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haga clic aquí para obtener la función que más necesita...
Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
- ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!