¿Cómo sumar / contar números en negrita en un rango de celdas en Excel?
Cuando tiene un rango de datos que contiene algunos números en negrita en una hoja de trabajo, y ahora desea sumar o contar solo las celdas en negrita, por supuesto, puede agregarlas una por una manualmente, pero llevará mucho tiempo. ¿Cómo podría sumar o contar solo las celdas en negrita en Excel de una manera fácil y rápida?
Cuente los números en negrita en un rango con la función definida por el usuario (VBA y fórmula)
Sumar números en negrita en un rango con la función definida por el usuario (VBA y fórmula)
Varios clics para contar y sumar celdas en negrita en un rango con Kutools para Excel
Cuente los números en negrita en un rango con la función definida por el usuario
Las siguientes Función definida por el usuario puede ayudarlo a obtener rápidamente la cantidad de celdas en negrita. Por favor haz lo siguiente:
1. Mantenga pulsado el ALT + F11 llaves, y abre el Ventana de Microsoft Visual Basic para aplicaciones.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.
Código VBA: cuente números en negrita en un rango de celdas
Function CountBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xCount As Double
For Each Rng In WorkRng
If Rng.Font.Bold Then
xCount = xCount + 1
End If
Next
CountBold = xCount
End Function
3. Luego guarde este código y escriba esta fórmula = CountBold (A1: C9) en una celda en blanco, mira la captura de pantalla:
4. Entonces presione Participar clave, y contará las celdas en negrita en el rango A1: C9.
Nota: A1: C9 en la fórmula indica el rango en el que desea usar la función para contar las celdas en negrita, puede cambiarlo según sus necesidades.
Sumar números en negrita en un rango con la función definida por el usuario
Y si desea sumar solo los números en negrita en un rango de datos, también puedo crear una función definida por el usuario para que la resuelva.
1. Mantenga pulsado el botón ALT + F11 llaves, y abre el Ventana de Microsoft Visual Basic para aplicaciones.
2. Hacer clic recuadro > Móduloy pegue el siguiente código en el Ventana de módulo.
Código de VBA: sume números en negrita en un rango de celdas
Function SumBold(WorkRng As Range)
'Update 20220516
Dim Rng As Range
Dim xSum As Double
For Each Rng In WorkRng
If Rng.Font.Bold Then
xSum = xSum + Rng.Value
End If
Next
SumBold = xSum
End Function
3. Luego guarde este código y escriba esta fórmula = sumbold (A1: C9) en una celda en blanco, mira la captura de pantalla:
4. Y luego presione Participar , se han sumado todos los números en negrita del rango A1: C9. Ver captura de pantalla:
Nota: A1: C9 en la fórmula indica el rango en el que desea usar la función para sumar las celdas en negrita, puede cambiarlo según sus necesidades.
Varios clics para contar y sumar celdas en negrita en un rango con Kutools para Excel
YPuede contar o sumar fácilmente todas las celdas en negrita en un rango con varios clics sin tener que manejar un código VBA complicado y recordar fórmulas.
Antes de aplicar Kutools for Excel, Por favor descargarlo e instalarlo en primer lugar.
1. Para contar las celdas en negrita, seleccione una celda en blanco para ubicar el resultado y luego haga clic en Kutools > Funciones de Kutools > Estadística y Matemáticas > COUNTBYFONTBOLD.
Y para sumar celdas en negrita, haga clic en Kutools > Funciones de Kutools > Estadística y Matemáticas > SUMBYFONTBOLD. Ver captura de pantalla:
2. En la FArgumentos de unción cuadro de diálogo, especifique el rango con celdas en negrita que necesita contar o sumar en el cuadro Referencia, y luego haga clic en el OK del botón.
Ahora, el recuento o la suma de todas las celdas en negrita en el rango especificado se completan en la celda seleccionada inmediatamente. Ver captura de pantalla:
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.
Mantenga constante la referencia de la celda de fórmula con Kutools para Excel
Artículos relacionados:
¿Cómo identificar y seleccionar todas las celdas o texto en negrita en Excel?
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!