Seite 1 von 1

Quersumme (Ziffernsumme) einer Zahl berechnen

Verfasst: Fr 24. Feb 2023, 15:49
von LO-Joe
Hallo,

in LibreOffice Calc gibt es leider keine eingebaute Formel zum berechnen der Quersumme.

Beispiel:
Die (dezimale) Quersumme der (Dezimal-)Zahl n = 1337 ist q = 1 + 3 + 3 + 7 = 14

Nach einer längeren Suche im Netz, bin ich im englischsprachigen OpenOffice Forum im Beitrag „[Solved] Calculating digit sum of integers in a column“ fündig geworden:
https://forum.openoffice.org/en/forum/v ... 02#p398580
Here's one way to add up all the digits of a number in cell A1:
=SUMPRODUCT(VALUE(MID(A1;ROW(INDIRECT("z1:z"&LEN(A1)));1)))
Da sich die Namen der Calc-Funktionen in Deutsch und Englisch unterscheiden, hier die Formel mit deutschen Funktionsnamen, um die Quersumme einer Zahl (in der Zelle A1) zu berechnen:

=SUMMENPRODUKT(WERT(TEIL(A1;ZEILE(INDIREKT("z1:z"&LÄNGE(A1)));1)))

Ich hoffe, dies erspart anderen eine langwierige Suche.

Gruß
LO-Joe

Re: Quersumme (Ziffernsumme) einer Zahl berechnen

Verfasst: Sa 25. Feb 2023, 08:06
von echo
Hallo zusammen
hier noch ein netter Link zur Quersumme.
https://www.herber.de/excelformeln/page ... tteln.html
Steht zwar Excel drüber, funktioniert aber auch in CALC.

Weiter unten dazu vielleicht interessant:
  • Sollte die Quersumme der Quersumme berechnet werden, bis nur noch eine einstellige Zahl übrig bleibt.
PS: Beachtete die {geschweiften Klammern} als Zeichen einer Matrix-Formel

Gruß Holger

Re: Quersumme (Ziffernsumme) einer Zahl berechnen

Verfasst: Sa 25. Feb 2023, 09:18
von blende8
Interessant, danke!