Office: Zellen einen "Status" zuweisen

Hallo.
Ich möchte einer Zelle, die eine Zahl enthält, in Abhängigkeit der Nachbarzelle (Text) einen Status zuweisen. Oder anders gesagt, die Zahl-Zelle soll zu Kategorie 1 oder 2 gehören, basierend auf dem Eintrag im Nachbarfeld.
Anschließend sollen dann alle Zahlen einer Zeile addiert werden, je einmal pro Kategorie.
Beispiel mit den Kategorien "u" und "e":

6 | u | 0 | e | 5 | e |Summe(e)=5 | Summe(u)=6
0 | u | 0 | u | 4 | e |Summe(e)=4 | Summe(u)=0
3 | e | 0 | e | 1 | e |Summe(e)=4 | Summe(u)=0
6 | e | 5 | u | 2 | e |Summe(e)=8 | Summe(u)=5

Ich danke im Voraus!

 

zu welcher Zahl welche Kategorire. Du hast 3 unterschiiedluche Zahlen aber nur 2 Kategorien?
Ich gehe mal von Spalte A aus.

 

Hallo,

in der beiliegenden Datei habe ich dir eine benutzerdef. VBA-Funktion eingefügt:
=SUMMEWENNZeile($A1:$F1;"e")
um alle mit "e" gekennzeichneten Werte im Bereich A1:F1 zu summieren oder
=SUMMEWENNZeile($A1:$F1;"u")
um alle mit "u" gekennzeichneten Werte im Bereich A1:F1 zu summieren.

Die dazu gehörige VBA-Funktion lautet:

Code:

Option Explicit

Public Function SUMMEWENNZeile(Bereich As Range, Krit As String) As Variant
   Dim I As Long
   Dim s As Variant
  
   s = 0
   With Bereich
      For I = 1 To .Cells.Count
        If I Mod 2 = 0 Then
          If .Cells(I).Value = Krit Then s = s + .Cells(I - 1).Value
        End If
      Next I
   End With
   SUMMEWENNZeile = s
End Function

Der zu verwendende Bereich muss einzeilig sein mit einer geradzahligen Anzahl an Zellen.

 

Es sind sogar noch mehr Zahlen und nur 2 Kategorien. Die Kategorien dienen ja quasi nur der Zuweisung, welche Zahlen addiert werden sollen.

Danke für die Antwort. VBA hab ich noch nie gemacht, guck ich mir aber an.
Ohne VBA gehts wohl nicht? :)

 

Hola,
vielleicht versteh ich's ja auch nur falsch...
=SUMMEWENN(B1:F1;"e";A1:E1)
bzw.
=SUMMEWENN(B1:F1;"u";A1:E1)