SummeWenn - Summenprodukt ?
07.07.2020 16:14:01
Andreas
ich kämpfe an einem kleinen Problem: Habe in Zellen "Strings" aus Symbol plus einer Zahlen in "( )". Zahlen sind
Ganzzahlen von 0 bis 99 oder -1 bis -99 also positiv oder negativ.
Würde jetzt gerne alle Zahlen in den Klammern summieren, welche davor das gleiche Symbol haben.
Über Textfunktionen und Hilfsspalten (Klammer finden, Zahl extrahieren) bekomme ich es hin, es geht doch sicher aber auch in einer Formel). Habe auch noch folgende UDF im Forum gefunden.
Public Function sum(rngBereich As Range) As Long
Dim zelle As Range
Dim SPL
Dim lngX As Long
For Each zelle In rngBereich
SPL = Split(zelle, "(")
For lngX = 1 To UBound(SPL)
sum = sum + Val(SPL(lngX))
Next
Next
End Function
Die Funktion extrahiert zuverlässig positive und negative Zahlen in Klammern, bekomme Sie aber nicht
mit SummeWenn oder Summenprodukt kombiniert. Irgendjemand eine Idee?
Sollte es auf eine eigene UDF hinauslaufen, wäre als Eingabe der Range (alle Zellen) + Suchfeld (eine Zelle) sehr schön.
Ich hänge noch eine kleine Beispieldatei
https://www.herber.de/bbs/user/138828.xlsm
plus ein Bild der "schön wäre Funktionsweise" an.
Vorab allen die diesen Post lesen, sich Gedanken machen, vielen Dank.
Gruß Andreas