WENN-Funktion (zu viele Argumente)

Moin Moin,

ich wollte für die Arbeit eine Exceltabelle erstellen.(Eine Mappe mit mehreren Blättern)

Wenn ich auf dem Blatt "Maske" ins Feld "B1" einen Namen schreib der auf den anderen Blättern auf "B1" hinterlegt ist, soll er das Feld "B2" des dazugehörigen Blattes in das Feld "B2" des Blattes "Maske" schreiben.

Es Handelt sich hierbei um verschiedene Verkaufsartikel. Jeder Artikel hat sein Eigenes Blatt.

Meine Formel sieht im Moment so aus:

=WENN(B1=Barras!B1;Barras!B2;WENN(Maske!B1=Freibourg!B1;Freibourg!B2;WENN(Maske!B1=Milano!B1;Milano!B2;WENN(B1=Dayton!B1;Dayton!B2;WENN(Maske!B1=Alaska!B1;Alaska!B2;WENN(Maske!B1='Frankfurt(1-farbig)'!B1;'Frankfurt(1-farbig)'!B2;WENN(Maske!B1='Frankfurt(2-farbig)'!B1;'Frankfurt(2-farbig)'!B2;WENN(Maske!B1=Frontera!B1;Frontera!B2;WENN(Maske!B1;Loreto!B1;Loreto!B2;WENN(Maske!B1;Mataro!B1;Mataro!B2;WENN(Maske!B1;Teresina!B1;Teresina!B2;WENN(Maske!B1=Borneo!B1;Borneo!B2;WENN(Maske!B1=Soroni!B1;Soroni!B2;WENN(Maske!B1=Trinidad!B1;Trinidad!B2;WENN(Maske!B1=Malaga!B1;Malaga!B2;WENN(Maske!B1=Stuttgart!B1;Stuttgart!B2;WENN(Maske!B1=Kisumu!B1;Kisumu!B2;WENN(Maske!B1;Manica!B1;Manica!B2;WENN(Maske!B1=Mongu!B1;Mongu!B2;WENN(Maske!B1=Beja!B1;Beja!B2;WENN(Maske!B1=Caribien!B1;Caribien!B2;WENN(Maske!B1=Toulon!B1;Toulon!B2;WENN(Maske!B1=Jamaica!B1;Jamaica!B2;WENN(Maske!B1=Java!B1;Java!B2;WENN(Maske!B1=Hagen!B1;Hagen!B2;WENN(Maske!B1=Lakewood!B1;Lakewood!B2;WENN(Maske!B1=Weyburn!B1;Weyburn!B2;WENN(Maske!B1=Sölden!B1;Sölden!B2;WENN(Maske!B1=Tulsa!B1;Tulsa!B2;WENN(Maske!B1=Lido!B1;Lido!B2;WENN(Maske!B1=Washington!B1;Washington!B2;WENN(Maske!B1=Cadiz!B1;Cadiz!B2;WENN(Maske!B1=Lerida!B1;Lerida!B2;"0"))))))))))))))))

kurz:

=WENN(B1=Barras!B1;Barras!B2;WENN(Maske!B1=Freibourg!B1;Freibourg!B2;WENN....

wenn nichts zutrifft soll er "0" ausgeben.

Nun sagt er mir "Zu viel Argumente", ist das so? kann man das umgehen oder sonst etwas tuhen?

Ich danke schon mal für die Antworten und eure Lösungsvorschläge.

MfG

kray

PC, Office, Microsoft Excel, Tabelle
Excel-Datei meldet Fehler beim Öffnen

Hallo Excel-Spezialisten,
seit kurzem bekomme ich diese Fehlermeldung, wenn ich eine ganz bestimmte Excel-Datei öffne:

Die Datei konnte von Excel geöffnet werden, indem der nicht lesbare Inhalt repariert oder entfernt wurde.  
Reparierte Datensätze: Externer Formelbezug von /xl/externalLinks/externalLink3.xml-Part (Zwischengespeicherte Werte eines externen Formelbezugs).  
Klicken Sie hier, um eine Logdatei der Reparaturen anzuzeigen. (Link: C:\Users\Distel\AppData\Local\Temp\error275200__01.xml)  

<recoveryLog xmlns="<a href="http://schemas.openxmlformats.org/spreadsheetml/2006/main">http://schemas.openxmlformats.org/spreadsheetml/2006/main</a>">
<logFileName>error275200_01.xml</logFileName>
<summary>
Fehler in Datei 'C:\Users\Distel\Documents\Daten\300_Comp\350_Moltkestr\Ausgaben\2014_NK\2014_Schluss-Rg.xlsx'
</summary>
<repairedRecords summary="Die folgenden Reparaturen wurden durchgeführt:_x000d__x000a__x000d__x000a_">
<repairedRecord>
Reparierte Datensätze: Externer Formelbezug von /xl/externalLinks/externalLink3.xml-Part (Zwischengespeicherte Werte eines externen Formelbezugs)
</repairedRecord>
</repairedRecords>
</recoveryLog>  
  • Wie kann ich den Fehler bis auf die verursachende Zelle mit dem externen Bezug einkreisen?

  • Wie kann ich die Fehlermeldung loswerden, denn nach der Reparatur (durch Excel) und wieder Abspeichern auf dem selben Dateinamen, erscheint beim nächsten Öffnen die Fehlermeldung wieder.

Weitere Infos:
Nach der Reparatur (durch Excel) erscheint bei noch geöffneter Datei oben der Zusatz [Repariert] hinter dem Dateinamen.

Version: Excel 2010 BS: Windows 7

Distel

Microsoft Excel, Bezug, Fehlermeldung
Excel ZÄHLENWENN mit relativen Bezug auf Zelle oberhalb der aktuellen

Hallo,
Ich habe eine Tabelle, in der ich die erste Spalte auf Duplikate überprüfen möchte.
Dazu sorteiere ich diese Spalte (alles Zahlen) in aufsteigender Reihenfolge und möchte nun die "Zählenwenn"-Funktion verwenden, um die Duplikate zu zählen.
Da die Spalte ja sortiert ist kann ich sicher sein, dass gleiche Zahlen immer übereinander liegen, sodass ich in der "Zählenwenn"-Funktion folgendes haben möchte:

=ZÄHLENWENN(Bereich;Inhalt=Inhalt der Zelle oberhalb)

Die Zählenwennfunktion durchläuft ja alle Zellen im Bereich, weshalb (theoretisch) die Funktion "Adresse()" mit "Zeile()" und "Spalte()" als Parameter die aktuelle Zelle referenzieren/sich darauf beziehen.
Das würde bedeuten, dass ich in der "Zählenwenn"-Funktion als zweiten Parameter eigentlich nur folgendes eingeben müsste:

Adresse(Zeile()-1;Spalte())

Funktioniert nicht.
In einigen Beispielen habe ich gesehen, dass Bezüge auf andere Zellen in der "Zählenwenn"-Funktion mit einem "&" beginnen, also habe ich folgendes versucht:

=ZÄHLENWENN(A2:A3000;&ADRESSE(ZEILE()-1;SPALTE()))

Wieder kein Erfolg.

Deshalb die Frage: Wie kann ich in der "Zählenwenn"-Funktion in Excel mich auf eine Zelle, relativ zur aktuellen beziehen? Das hier genannte Beispiel wird sicher auch anders zu lösen gehen, aber den genannten relativen Bezug (also relativ zur Aktuellen Zelle) könnte man in der Zählenwenn schon öfters brauchen. Danke und lg, Springrbua

Microsoft Excel, Funktion, VBA, Anzahl, Tabelle, zaehlenwenn
VBA: Zwei Spalten mit Wert multiplizieren und dann addieren mit Hilfe von Makros

Hallöchen,

ich habe folgendes Problem Ich habe zwei Spalten die ich jeweils miteinander addieren möchte. Doch bevor ich diese addiere, möchte ich Spalte B mit dem Wert aus der TextBox1 multiplizieren und Spalte C mit dem Wert aus Textbox2. Danach sollen beide Spalten miteinander addiert und dann sortiert werden. Spalte D ist in diesem Fall die Ergebnisspalte. Das Programm hat auch schon funktioniert, jedoch habe ich vorher nur die spalten addiert und sortiert.

HIer mein bereits geschriebener Code:

Private Sub CommandButton1_Click()



' Prüfen ob Lastspitzen eingetragen wurden, ansonsten Fehlermeldung

        If TextBox1.Value = "" Or TextBox2.Value = "" Then
        MsgBox "Bitte geben Sie eine Lastspitze ein!"
     
Else
        
Dim wks As Excel.Worksheet
Dim lngLetzteZeile As Long
Dim Last1 As Integer
Dim Last2 As Integer
Last1 = TextBox1.Value
Last2 = TextBox2.Value  

Set wks = ActiveWorkbook.Worksheets("Vergleich")


With wks
 
lngLetzteZeile = .Cells(.Rows.Count, "B").End(xlUp).Row
If lngLetzteZeile < 15 Then Exit Sub

 With .Range("D15:D" & lngLetzteZeile)
 'berechne: D := B + C
 .FormulaR1C1 = "=RC[-2]*Last1+RC[-1]*Last2"
 'Formeln durch deren Ergebnis ersetzen
 .Value = .Value
 End With
 
With .Range("B15:D" & lngLetzteZeile)
 .Sort Key1:=.Cells(2), Order1:=xlDescending, _
 DataOption1:=xlSortTextAsNumbers, _
 SortMethod:=xlPinYin
End With

End With
End If


End Sub
Microsoft Excel, Makro, VBA

Meistgelesene Beiträge zum Thema Microsoft Excel