Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

Zellen addieren, die unterschiedliche Währungsformate haben





Frage

Hallo, ich möchte Zellen getrennt nach Währungsformat addieren. z.B. A1: 100€ A2: 200$ A3: 150€ A9: 20 GBP Ax: 200$ Ergebnis: A20: 250€ A21: 200$ Gibt es eine eleganter Lösung als: A20=A1+A3 A21=A2+Ax A22=..... Danke

Antwort 1 von Viel-leicht-So

Hallo
Versuch mal
Formel in A20: =SUMME(A1;A3) usw.
Gruß

Antwort 2 von Saarbauer

Hallo,

das gleiche Problem, Lösung vielleicht auch hier zu nutzen

https://supportnet.de/threads/1234692

Gruß

Helmut

Antwort 3 von AlFox

Hallo Viel-leicht-So,
danke, aber das ist genauso wie meine "Not"-Lösung.

Hallo Saarbauer,
nein, das bringt mir nichts, weil bei deinem Lösungsvorschlag sind die Zahl und die Währung in unterschiedlichen Zellen, bei mir ist es in einer Zelle und die Zahl hat das WährungsFORMAT.

Gruß
Alfred

Antwort 4 von Saarbauer

Hallo,

hast du die möglichkeit mit zwei Hilfsspalten zu arbeiten (z.B. B und C

Dann in B4

=WENN(ISTKTEXT($A4);$A4;WERT(TEIL($A4;1;SUCHEN(" ";$A4;1)-1)))

Und in C4

=WENN(ISTKTEXT($A4);"€";TEIL($A4;SUCHEN(" ";$A4;1);10))

und dann im anderen Thread weiter

Anmerkung: Formeln funkzionieren nur mit einem Leerzeichen zwischen Betrag und Währung

Gruß

Helmut

Antwort 5 von Event

Hallo

Mit einer kleinen Funktion in vba könnte das gehen:
Nachfolgenden Code in den Codebereich eines Moduls kopieren:
Option Explicit

Function wspalte(wformat As String, bereich As Range)
Dim ad$, zelle, summe
For Each zelle In bereich
If zelle.NumberFormat = wformat Then 
summe = summe + zelle
end if
Next
wspalte = summe
End Function

In einer Zelle(z.B. C20 ) =wspalte("#,##0.00 $";C2:C19) eingetragen, gibt die Funktion die Summe der angegebenen gleichartig formatierten Zellen zurück.
Schwierig ist lediglich das Herausfinden des Orginalformatstrings!

Gruß