Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
408to412
408to412
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

SUMMEWENN-Matrix via VBA abbilden

Forumthread: SUMMEWENN-Matrix via VBA abbilden

SUMMEWENN-Matrix via VBA abbilden
Roland
Salü zusammen,
ich bin nicht zuletzt Dank herber.de mittlerweile schon "ein kleines bißchen" dem VBA-DAU-Stadium entwachsen, stoße aber immer wieder an meine Grenzen, wie auch jetzt.
In einer Arbeitsmappe habe ich eine mördermäßige SUMMEWENN-Matrix, die ca. 10.000 Zeilen einer anderen Arbeitsmappe abarbeiten muss. Das ganze sieht dann so aus:
{=SUMME(WENN($I$18="Alle";0);((WENN(Daten!$B$2:$B$10000=$D$19;WENN(Daten!$C$2:$C$10000=$D$21;WENN(Daten!$D$2:$D$10000=$I$18;Daten!$N$2:$N$10000))))))}
Sieht ziemlich heftig aus, funktioniert aber, wenn auch nur sehr langsam! Deshalb die Frage, ob man sowas über VBA auch eleganter lösen kann?
Für einen kleinen geistigen Schubser wäre ich dankbar!
THX und viele Grüße
Roland
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: SUMMEWENN-Matrix via VBA abbilden
Boris
Hi Roland,
...oder mit der Find-Methode auf diese Art (Performance ungetestet):
Option Explicit

Sub til()
Dim C1, C2, C3, C As Range, firstAddr As String
C1 = "a": C2 = "b": C3 = 2
Dim mySum As Double
With Range("A:A")
Set C = .Find(C1, lookat:=xlWhole)
If Not C Is Nothing Then
firstAddr = C.Address
Do
If C.Offset(0, 1) = C2 And C.Offset(0, 2) = C3 Then mySum = mySum + C.Offset(0, 3)
Set C = .FindNext(C)
Loop While Not C Is Nothing And C.Address <> firstAddr
End If
End With
MsgBox mySum
End Sub

Spalte D wird summiert, wenn Spalte A = "a", B = "b" und C = 2
Grüße Boris
Anzeige
-> An Mac4 und Boris
08.04.2004 16:47:18
Roland
Beide Tips sind super; da hab' ich was zu knacken!
Dank an Euch und Gruß
Roland
;

Forumthreads zu verwandten Themen

Wenn nur Text in Zelle...
MichiM

Hallo,
ich habe eine umfangreiche Artikelliste (ca. 250.000 Artikel) aus einer Datanormdatei erstellt.
Aus dieser muss ich jetzt alle Artikel entfernen, dessen Artikelnummer (in Spalte A; als Text formatiert, damit führende Nullen nicht gelöscht werden) keinerlei Zahlen enthalten.
E...
22.08.2008 16:24:44
Thread-ID: 1003960
4 Beiträge
Wenn ComboBox Dann ListBox
sockel939

Hallo Excelfreunde,
habe hier ne Legerverwaltung dessen Code ich gerne um einen Punkt erweitern möchte.
Und zwar soll die TextBox " Lagerbestand" aus der UserForm die Gesamtmenge aus der Tabelle "Lagerstand" wiedergeben in abhängigkeit des Wertes der in der ComboBox "Marke"
eingegeb...
16.10.2008 15:36:46
Thread-ID: 1016894
3 Beiträge
Anzeige
Wenn Eintrag in ListBoxspalte dann Eintrag in lbl
Josef

Guten Morgen!
In eine mehrspaltige ListBox werden eine Menge Datensätze eingelesen.
Ich möchte nun folgendes erreichen:
Wenn ich einen Datensatz in der ListBox markiere oder anklicke und wenn jetzt z.B. in der 2.Spalte in der ListBox ein "J" steht, dann soll ein vordefinierter Text...
29.10.2008 07:57:42
Thread-ID: 1020127
3 Beiträge
Anzeige
Wenn Ordner noch nicht existiert dann MsgBox Meld.
Josef

Hallo!
Ich möchte mit folgendem Code gleich den richtigen Ordner zum aussuchen der Dateien öffnen lassen:
Dim dokname
Dim dokname2
dokname = Range("Tabelle1!D1").Value
dokname2 = Range("Tabelle1!D2").Value
With Application.FileDialog(4)
.InitialFileName = "K:\Allg_da...
04.12.2008 06:21:22
Thread-ID: 1030007
3 Beiträge
Formelproblem "wenn(text - beinhaltet, dann....)
Andi

Hallo Experten,
Ich steh bei folgender Excelformel an.
=WENN(D13=....folgender text beinhaltet ist (AA).....;"True";"false")
Ich würde gerne überprüfen ob im Feld D13 der Text "AA" vorkommt (z.B. Artikel "AA01"), falls dies zutrifft bitte "True" schreiben, ansonsten "false".
Da...
04.12.2008 11:42:00
Thread-ID: 1030117
3 Beiträge
Wenn keine CheckBox aktiviert dann MasgBox
Heinz

Guten abend, Leute im Forum
Ich würde gerne in UF, wenn die CheckBoxen 8,16,32, nicht aktiviert sind, das dann eine
MsgBox "Keine Linie ausgewählt" erscheint.
Könnte mir dazu bitte jemand weiterhelfen.
Danke & Gruß
Heinz
18.01.2009 20:59:21
Thread-ID: 1041266
3 Beiträge
Anzeige
Wenn feste Zeichenfolge in Textbox, dann...
Lenni

Moin Excellianer!
Im Archiv finde ich leider nichts Vergleichbares und mit der InStr-Funktion setze ich mich auch schon bezüglich meiner Fragestellung auseinander. Komme aber leider zu keinen Ergebnissen.
In einem UserForm1 steht in der Textbox1 ein beliebiger Text von beliebiger Länge....
27.04.2009 22:31:44
Thread-ID: 1071497
3 Beiträge
summewenn über Index / Matrix ?
Pascal

Hallo zusamme,
ich stehe zurzeit vor einem kleinen Excelproblemchen.
Ich habe eine Tabelle die in Spalten Monate angeordnet hat (Monate kommen mehrfach vor).
In der Zeilenüberschrift stehen mehrere Prozentuale Werte (Kommen jeweil nur einmal vor)
Nun möchte ich jeweils quasi die...
26.06.2009 13:35:46
Thread-ID: 1084587
2 Beiträge
summe wenn nur text kriterien
ivonne

hallo,
ich sitze schon seit stunden und kapier´s einfach nicht :(
ihr genies könnt mir sicher einen tipp geben - für euch bin ich echt anfänger ;(
ich habe eine riesen exce liste
spalte a steht text spalte b steht text und in spalte g stehen euro werte
ich brauche eine summe...
17.07.2009 14:19:23
Thread-ID: 1089433
17 Beiträge
summenprodukt und zählenwenn?
oli.p

Hallo zusammen.
Seit ca. 2,5h versuche ich mich an einer Formel.
Ich möchte Umfrageergebnisse miteinander verküpfen.
Mit einer Fomel möchte ich folgendes ausgeben:
"Wöchentliche Besucher" denen ein Sport- und Kursangebot wichtig ist "1" und "2".
Meiner Kombination von Summen...
12.08.2009 15:20:00
Thread-ID: 1095340
11 Beiträge
Wenn nicht Spalte X dann Spalte Y
greenhorn

Ich möchte die prozentuale Veränderung von Zahlenwerten gegenüber einem Vergleichszeitraum darstellen.
Die Herausforderung:
Die Werte kommen entweder in [kWh] oder [m³] vor und sind in entsprechen Spalten eingetragen. Die %-uale Veränderung soll aber nur in einer Spalte abgebildet werde...
18.08.2009 16:08:52
Thread-ID: 1096837
7 Beiträge
Zählenwenn externe Daten
Markus

Hallo Leute.
Habe eine Tabelle(A) in der ich die Daten aus verschiedenen anderen ExcelDatein(B) einlese bzw. gleich ein errechne.
Nun habe ich zum beispiel Mittelwerte und Summen aus Zahlenkolonen andere Dateien(B) in A erzeugt, das klappt alles wie es soll. Jetzt brauche ich allerdings...
08.10.2009 12:26:24
Thread-ID: 1108152
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige