Sumar números en negrita en Excel

Compatibilidad: Truco compatible con Excel 365Truco compatible con Excel 2016Truco compatible con Excel 2013Truco compatible con Excel 2010Truco compatible con Excel 2007

Podemos crear una función que nos permita sumar el número de caracteres numéricos que tiene un estilo en negrita (Sumar números en negrita en Excel).

Podemos crear una función UDF (definida por el usuario) y utilizarla como una función más de Excel..
Sumar números en negrita en Excel

Disponemos de una hoja con el origen de datos, donde:

– Columna A. Nombre de la empresa.

– Columna B. Rango B2:B11 con los importes de las facturas, B3, B5 y B6 en negrita (identifica los importes pendientes de cobro).

 ABCD
1ClienteDescuento Cobros Pendientes:
2Empresa 112.500,00  
3Empresa 215.600,00  
4Empresa 3450,00  
5Empresa 48.300,00  
6Empresa 5625,00  
7Empresa 6455,50  
8 Empresa 71.100,00  
9Empresa 81.100,00  
10Empresa 9875,00  
11Empresa 10950,00  

Deseamos conocer el total de las facturas pendientes de cobro (que se incluyen con formato en negrita).

  1. Con Excel abierto.

  2. Pulsar la tecla Alt y mantener pulsada / Pulsar la tecla F11. Mostrará el editor de Visual Basic.

  3. Ir a: Barra de Menú / Insertar / Módulo. Mostrará la ventana del módulo donde escribimos la macro.

  4. Escribir el código de la macro:

    Function SumaNegrita (Valor As Range)

    Dim Mi_Rango As Range

    Dim Cuenta As Long

    For Each Mi_Rango In Valor

    If Mi_Rango.Font.Bold Then

    Sumar = Sumar + Mi_Rango.Value

    End If

    Next

    SumaNegrita = Sumar

    End Function

  5. Guardar el libro con la extensión *.xlsm. Libro habilitado para macros, que permite sumar números en negrita.

  • INSERTAR FUNCIÓN

  1. Ir a: Ventana de Excel.

  2. Ir a: Celda E1 / Escribir:

    =SumaNegrita(B2:B11)

    O también, Ir a: Barra de fórmulas / Clic sobre fx (Insertar función) / Ir a: O seleccionar una categoría / Seleccionar: Definida por el usuario / Doble clic sobre: SumaNegrita. Mostrará los argumentos de la función.

    Ventana de argumentos de la función SumaNegrita
  3. Ir a: Valor / Seleccionar el rango B2:B11. Celda que deseamos sumar los números en negrita.

    Sumar números en negrita en Excel: Celda E1 sumando el número de celdas en negrita de rango B2:B11
  4. Verificar como la celda E1 muestra 24.525,00 como la suma de B3, B5 y B6 (fuente en negrita).

Mediante macros podemos crear una función definida por el usuario que nos permita sumar números en negrita en Excel.

Nivel de dificultad: Experto VBA-Macros Excel Experto VBA – Macros

3 comentarios en “Sumar números en negrita en Excel

  • Hola! Muy bueno!
    Yo justo estoy trabajando con una planilla en la que quiero que me sume las cifras en negrita, ahora bien…tengo un problema.

    No se actualiza automáticamente (ni siquiera con F9, debo hacer dobleclick en la celda y dar enter).
    ¿Cómo puedo hacer para que se actualice automáticamente a medida que aplico o quito negritas?

    Muchas gracias.

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *