Consejo: Otros idiomas son traducidos por Google. Puedes visitar el English versión de este enlace.
Iniciar sesión
x
or
x
x
Suscríbete
x

or

¿Cómo sumar todos los dígitos en un número en Excel?

Si tiene una celda que contiene un valor, y ahora desea agregar todos los dígitos de la celda. Por ejemplo, si tiene el valor 12345 en una celda, quiere hacer este cálculo: 1 + 2 + 3 + 4 + 5, y obtenga el valor 15. ¿Hay alguna buena manera de sumar todos los dígitos de un número en Excel?

Suma todos los dígitos en números con fórmulas

Sumar todos los dígitos en números con la función definida por el usuario

Sumar todos los dígitos en números con Kutools para Excel


Sume todos los números individuales dentro de una celda:

Con Kutools for Excel, Números de suma en una celda fórmula, puede sumar rápidamente todos los dígitos de un número en una celda.

doc-sum-digits-9

Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!



Sin agregar los dígitos uno por uno manualmente, las siguientes fórmulas pueden ayudarlo a obtener la suma de una celda rápidamente.

1. Por favor ingrese esta fórmula =SUMPRODUCT(1*MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1))(A2 contiene el número que desea sumar sus dígitos, puede cambiarlo según sus necesidades) en una celda en blanco junto a sus datos, en este ejemplo, lo ingresaré en la celda B2. Ver captura de pantalla:

doc-sum-digits-1

2. Entonces presione entrar para devolver el resultado, y seleccione la celda B2, luego arrastre el controlador de relleno hasta el rango en el que desea aplicar esta fórmula, y obtendrá la suma de los dígitos de cada número de celda.

doc-sum-digits-1

Notas:

1. Excepto la fórmula anterior, también puede usar una fórmula de matriz: =SUM(1*MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)), y recuerda presionar Ctrl + Shift + Enter llaves juntas para obtener el resultado correcto.

2. Estas fórmulas funcionan bien si el número es un número entero positivo. Si hay un signo negativo o un punto decimal en el número, las fórmulas devuelven un #VALOR! error.


Para sumar todos los dígitos de un número de celda, el siguiente código VBA también puede ayudarlo.

1. Mantenga presionado el ALT + F11 llaves, y abre la Ventana de Microsoft Visual Basic para Aplicaciones.

2. Hacer clic recuadro > Móduloy pegue el siguiente código en Ventana de módulo.

Código de VBA: sume todos los dígitos de un número de celda

 Function SumDigits(ByVal Number As Long) As Long
'Update 20140905
    Do While Number >= 1
        SumDigits = SumDigits + Number Mod 10
        Number = Int(Number / 10)
    Loop
End Function

3. A continuación, guarde y cierre este código, regrese a la hoja de trabajo e ingrese esta fórmula = SumDigits (A2) en una celda en blanco, ver captura de pantalla:

doc-sum-digits-1

4. A continuación, arrastre el controlador de relleno hasta las celdas que desea que contengan esta fórmula, obtendrá el siguiente resultado.

doc-sum-digits-1

Notas:

1. Si el dígito de su número es más largo o igual a 11, obtendrá un valor de error.

2. Si el número contiene signo negativo, el resultado será cero; si el número contiene punto decimal, el resultado será incorrecto.


Aquí, también puedo hablar sobre una herramienta útil- Kutools for Excel, Con su Sumar números en una celda función, puede agregar rápidamente todos los dígitos dentro de un número.

Kutools for Excel : con más de 300 útiles complementos de Excel, de prueba sin límite en días 60.

Después de instalar Kutools for Excel, haz lo siguiente:

1. Haga clic en una celda en blanco donde desea generar el resultado.

2. Luego haga clic Kutools > Fórmulas > Sumar números en una celda, mira la captura de pantalla:

doc-sum-digits-1

3. En la Formula Helper cuadro de diálogo, haga clic en doc-sum-digits-1 para seleccionar el valor de celda que desea sumar los dígitos, vea la captura de pantalla:

doc-sum-digits-1

4. Luego haga clic Ok y arrastra el controlador de relleno a las celdas que deseas para sumar los dígitos en las celdas. Y todos los dígitos en cada celda se han agregado, vea la captura de pantalla:

doc-sum-digits-1

Descargue y pruebe de forma gratuita Kutools for Excel Now!


Kutools for Excel: con más de 200 útiles complementos de Excel, de prueba sin límite en días 60. Descargar y prueba gratis ahora!


Artículo relacionado:

¿Cómo sumar la diagonal de un rango en Excel?


Kutools for Excel: la mejor herramienta de productividad de Office aumenta su productividad en un 80%

  • Super Formula Bar (edite fácilmente varias líneas de texto y fórmula); Diseño de lectura (lee y edita fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas y mantener datos; Contenido de celdas divididas; Combinar filas duplicadas y suma / promedio... Prevenir células duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Celdas múltiples sin cambiar la referencia de fórmula; Crear referencias automáticamente a múltiples hojas; Insertar viñetas, Casillas de verificación y más ...
  • Fórmulas favoritas e insertadas rápidamente, Gamas, cuadros y cuadros; Cifrar celdas con contraseña Crear una lista de correo y enviar correos electrónicos ...
  • Extracto del texto, Agregar texto, Eliminar por posición, Eliminar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper 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 de trabajo y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes xls, xlsx y PDF...
  • Funciona con Office 2007-2019 y 365, y es compatible con todos los idiomas. Es fácil de implementar en su empresa. Funciones completas de prueba gratuita de 60-day.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilitar la edición y lectura con pestañas en Word, Excel, PowerPoint, Editor, Acceso, Visio y Proyecto.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta tu productividad en un 50% y reduce cientos de clics de ratón por ti todos los días!
fondo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Ezequiel · 15 days ago
    Thank you so much
  • To post as a guest, your comment is unpublished.
    john dick · 2 months ago
    I am trying to find the avg of multipule numbers in a cell, lets say 22,11,18,14,3,6 are all in the same cell is there a way for another cell to display 12.3?
    • To post as a guest, your comment is unpublished.
      skyyang · 2 months ago
      Hello, john,
      To calculate the average of multiple numbers within a cell, please apply the below formula:
      =IF(A1="","",ROUND(SUMPRODUCT(--(0&TRIM(MID(SUBSTITUTE(A1,",",REPT(" ",99)),ROW($1:$99)*99-98,99))))/(LEN(A1)-LEN(SUBSTITUTE(A1,",",))+1),2))
      Note: the last number 2 in the formula indicates that retain two decimal places after rounding. You can change it to your need.

      Please try it, hope it can help you!
  • To post as a guest, your comment is unpublished.
    yun · 8 months ago
    Before i ask i apologize about some rude and hard -to-understand expressions which could be in follow sentences caused by my poor English skill in advance.

    Thanks. It was helpful.
    I could use this functions and solve the problem though, I actually couldn't get how the function work.

    This is the function :
    =SUM(1*MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1))

    I know functions "SUM", "MID", "ROW", and "INDIRECT", but I have no idea about expressions "1*MID" and ""1:"&" at all.

    Can someone give me any answer or clue which can make me understand?
  • To post as a guest, your comment is unpublished.
    Birzhan · 1 years ago
    Hi,
    your formula is very useful.
    but I need to have a one number at the end, but your formula is giving two numbers.
    can you help?
    regards
  • To post as a guest, your comment is unpublished.
    panjianom · 1 years ago
    Great code!
    How to repeat the process into 1 digit with VBA code?
    Example: 463 > 4+6+3=13 > 1+3=4
  • To post as a guest, your comment is unpublished.
    Pranam Shriyan · 1 years ago
    In same way how do i multiply
    i have some excel numbers like Exm : 445, 556 , 713 . ( 4*4*5 ) i want multiplication of this
    thnx
    • To post as a guest, your comment is unpublished.
      skyyang · 1 years ago
      Hi, Shriyan,
      To multiply all numbers within a cell, you can apply the following user defined function:


      Function MultiplyDigits(ByVal Number As Long) As Long
      'Update 20140905
      MultiplyDigits = 1
      Do While Number >= 1
      MultiplyDigits = MultiplyDigits * (Number Mod 10)
      Number = Int(Number / 10)
      Loop
      End Function

      And then apply this formula: =MultiplyDigits(A2)

      Please try it, hope it can help you!
  • To post as a guest, your comment is unpublished.
    Tongle · 1 years ago
    This is not all possible permutations. If I put 123, how can I get the 27 permutations. That means, including 111 etc.
  • To post as a guest, your comment is unpublished.
    JOSH · 1 years ago
    How can I add the values in a cell. For example if i have a huge number like 4583789484858 in a cell and I want them added together in such a way that
    the system does 4+5+8+3+7+8+9+4+8+4+8+5+8 to give me result of 81?
  • To post as a guest, your comment is unpublished.
    Karthikeyan M K · 4 years ago
    Very useful your coding.

    thanks
  • To post as a guest, your comment is unpublished.
    jcraggie · 4 years ago
    I'm trying to figure out a formula using arrays to add/subtract a number from each digit in a cell. Example: If A1 contains 7721, then I'd like B1 to contain 2278 (subtracting 9 from each digit in A1). I have tried and tried to figure this out without success. Thank you!
    • To post as a guest, your comment is unpublished.
      Rehan · 1 years ago
      if i have decimal number for example 22.2456 in excel how can i Sum for All this Digits ?
      please help me
      • To post as a guest, your comment is unpublished.
        skyyang · 1 years ago
        Hi, Rehan,
        To sum all digits in decimal number, the following code may help you.

        Function SumDigits(Number As String) As Integer
        Dim x As Integer, C As String
        For x = 1 To Len(Number)
        C = Mid(Number, x, 1)
        If IsNumeric(C) Then SumDigits = SumDigits + C
        Next
        End Function

        And then apply this formula: =SumDigits(A1).

        Please try this.