Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
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
1964to1968
1964to1968
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Zählenwenns mit Array

Forumthread: VBA Zählenwenns mit Array

VBA Zählenwenns mit Array
12.02.2024 22:54:38
PeTeR
Hallo VBA-Profis,
kann man die worksheetfunction.countifs mit einem mehrspaltigen Array nutzen? Z.B. countifs(array.spalte2,"Ja",array.spalte4,"Fußball")
Vielen Dank für eure Unterstützung!
PeTeR
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Zählenwenns mit Array
12.02.2024 23:24:42
Daniel
Hi
Prinzipiell kannst du mit WorksheetFunction.Index(DeinArray, 0, 2) die zweite Spalte eines Arrays herauslösen.

Funktioniert aber nicht mit CountIf, weil CountIf einen Zellbereich als Input benötigt.

Das müsstest du selbst per Schleife programmieren. Wobei die selbst programmierte Schleife sogar schneller sein kann, als die Excelfunktion, die ja intern ebenfalls diese Schleife durchlaufen muss.

Gruß Daniel
Anzeige
AW: VBA Zählenwenns mit Array
13.02.2024 10:44:50
PeTeR
Hallo Daniel,
vielen Dank für deine Antwort. Ich wollte prüfen, ob countifs evtl. noch schneller ist als meine Schleife.
VG PeTeR
AW: VBA Zählenwenns mit Array
13.02.2024 12:00:13
onur
Und warum machst du dann nicht ZWEI Arrays daraus statt nur eins?
AW: VBA Zählenwenns mit Array
13.02.2024 13:07:34
PeTeR
Hallo onur,
vielen Dank für die geniale Idee! Ich scheitere leider an der Umsetzung. Wie kommt das einspaltige Array in die Funktion?
Dim Sportbereich()
Dim Anz As Long
Sportbereich = Range("A2:A50000")
Anz = WorksheetFunction.CountIf(Sportbereich, "Fußball")
funktioniert leider nicht.
VG PeTeR
Anzeige
AW: VBA Zählenwenns mit Array
13.02.2024 13:10:40
onur
SET Sportbereich = Range("A2:A50000")
AW: VBA Zählenwenns mit Array
13.02.2024 13:17:15
daniel
Hi
ich schrieb doch: CountIF benötigt einen Zellbereich als Eingabewert und kann mit Arrays nicht arbeiten.
kuckst du auch hier:
https://learn.microsoft.com/de-de/office/vba/api/excel.worksheetfunction.countif
vergleiche die Beschreibung mit Funktionen, die Arrays verarbeiten können und erkenne den Unterschied (Abschnitt Parameter - Datentyp):
https://learn.microsoft.com/de-de/office/vba/api/excel.worksheetfunction.sum

wenn du mit CountIF arbeiten willst, musst du die Daten aus dem ExcelTabellenblatt direkt verwenden, also wenn, dann so: 
Dim Sportbereich as Range

Dim Anz As Long

Set Sportbereich = Range("A2:A50000")

Anz = WorksheetFunction.CountIf(Sportbereich, "Fußball")


Gruß Daniel


Anzeige
AW: VBA Zählenwenns mit Array
13.02.2024 13:23:42
onur
Du kannst aber auch direkt den Bereich/die Bereiche in die Funktion schreiben, statt den Umweg über die Arrays, da die Worksheetfunction sowieso schon schneller ist, als eine reine VBA-Lösung.
AW: VBA Zählenwenns mit Array
13.02.2024 13:35:43
daniel
"da die Worksheetfunction sowieso schon schneller ist, als eine reine VBA-Lösung."
nicht zwingend.
Worksheetfunction.Transpose beispielsweise ist sogar langsamer und weniger Leistungsfähig in Bezug auf die verarbeitbare Datenmenge, als wenn man das Umschreiben selber als Schleife programmiert. Die Frage, was besser oder schneller ist, lässt sich so pauschal nicht beantworten, da hinter den Worksheetfunctions oft noch alte Codebestandteile stecken, die noch aus 2003er-Zeiten stammen und nicht auf größere Datenmengen abgestimmt sind. Außerdem müssen Worksheetfunctions immer auch Zellobjekte händeln, was auch Zeit kosten kann, so dass die Schleife über Arrays durchaus Vorteile haben kann.

Allerdings sind diese Zeitvorteile meist eher akademischer Natur, da vielleicht messbar, aber selten spürbar. Und eine Zeile Code ist auch immer angenehmer als ein Block aus mehreren Zeilen, wie er für die Schleife erforderlich ist. (vorallem beim Testen im Einzelstep)

Gruß Daniel
Anzeige
AW: VBA Zählenwenns mit Array
13.02.2024 14:49:09
PeTeR
Vielen Dank euch beiden für die Unterstützung und Ausführungen!
;

Forumthreads zu verwandten Themen

Array-Formel in VBA-Code umwandeln?
Robert

Hallo,
ich bräuchte bitte eure Hilfe.
Hab folgende Formel...
Selection.FormulaArray = _
=IF(ROW(R[-107]C[-3])>COUNTA('1'!R5C[4]:R200C[4]),"""",INDEX('1'!R5C4:R200C4,SMALL(IF('1'!R5C[4]:R200C[4]<>"""",ROW(R1:R196),""""),ROW(R[-107]C[-3]))))"
Mein Problem ist, dass ic...
26.10.2008 10:56:28
Thread-ID: 1019326
13 Beiträge
Array-Formel in VBA
Peter

Hallöchen liebe Excel Gemeinde,
ich hab da ein kleines Problem, wo ich hoffe, dass mir die VBA Spezialisten unter Euch helfen können.
Und zwar geht es um folgende Formel im VBA Code:
wb1.Worksheets(letztdat3).Cells(4, d).FormulaArray = _ "=SUM(COUNTIF(INDIRECT("""" & TRANSPOSE...
02.02.2009 17:28:00
Thread-ID: 1046339
6 Beiträge
ArrayFormel zählenwenn mit VBA?
MBorn

Hallo,
ich versuche schon ein Weilchen, die Anzahl übereinstimmender Werte in Zeilen zu zählen.
mit
{=ZÄHLENWENN(INDIREKT("A"&I$1+1):INDIREKT("G"&I$1+1);$A2:$G2)}
klappt es.
Im blauen Bereich wird geprüft, wie viele Werte aus dem roten Bereich der selben Zeile mit<...
29.06.2009 12:15:01
Thread-ID: 1085034
6 Beiträge
Anzeige
Array In Vba
@lex

Hallo VBA-Spezialisten !
Seit graumer Zeit suche ich ein Code-Gerüst um Arrays in VBA zu programmieren.Hintergrund:
Ich habe ca. 500 Shapes (MSMap) in einem Blatt.
Mit einer Schleife wird jedes Objekt auf eine Eigenschaft geprüft.
Ist die Prüfung wahr, dann soll dieses Objekt der Se...
12.04.2002 11:59:16
Thread-ID: 112756
4 Beiträge
Array Formel summe wenn in VBA umwamdeln
t.wegmann@hengegroup.com

Hallo Liebes Forum,
ich habe ein Problem mit meiner Array-Formel:
=SUMME(WENN(('DATEN NEU'!$F$2:$F$25048=Frachten!$D4)*('DATEN NEU'!$N$2:$N$25048=Frachten!$F4) *('DATEN NEU'!$X$2:$X$25048=Frachten!H$2);'DATEN NEU'!$AB$2:$AB$25048))
Die Formel funktioniert gut, nur wenn ich die Date...
01.03.2010 09:54:52
Thread-ID: 1142293
2 Beiträge
ArraySumme von ABS Werten in VBA
ABS

Hallo Excel Freunde,
ich stehe gerade bei einer vermutlich banalen Sache auf der langen Leitung.
{=SUMME(ABS(A6:G6)) } Diese ArrayFormel bildet die Summe aller Einzelzellen von A6-G6 aus ihren individuellen ABS Werten.
Wie lautet diese Zeile in VBA, wenn testweise A6-G6 die Selectio...
10.03.2010 20:52:23
Thread-ID: 1144997
4 Beiträge
Anzeige
Array in VBA
PeTeR

Hallo VBA-Freaks,
ich habe 2 Spalten: Typ und Größe
Z.B.:
Typ Größe
A 1
B 3
A 4
C 2
A 5
B 1
C 4
Als Ergebnis hätte ich gerne folgendes (am liebsten per Makro in einem Array mit X*2 Feldern):
A: 1;4;5
B: 3;1<...
20.10.2010 13:56:57
Thread-ID: 1183205
7 Beiträge
Worksheets in dreidimensionales Array einlesen VBA
Jane

Hallo,
ich bin hier noch neu und auch noch nicht so geuebt in VBA.
Vielleicht stehe ich nur auf der Leitung, aber ich wuerde eigentlich gerne nur wissen, wie ich schnellstmoeglich ein ganzes Worksheet in ein dreidimensionales Array einlesen lassen kann ohne jede einzelne Zelle aufrufen...
20.03.2014 04:42:35
Thread-ID: 1354132
6 Beiträge
VBA Arraygröße dynmaisch erweitern ReDim
Krycho89

Hallo Forumsmitglieder,
ich habe ein Problem mit der dynamischen Erweiterung von einem Array
Mein Code sieht dabei folgendermaßen aus:
Sub Search()
Dim Suchbegriffe()
Dim newDim as Long
newDim = UBound(Suchbegriffe,1) + 1
ReDim Suchbegriffe(1 To newDim)
Suchbegr...
25.06.2015 08:05:28
Thread-ID: 1432965
9 Beiträge
VBA: Durchschnitt der x-größten Werte eines Arrays
Martin

Hallo,
gibt es eine einfache Möglichkeit den Durchschnitt der x-größten Werte eines Arrays zu ermitteln als VBA-Lösung? Als Formel geht es recht einfach:
http://chandoo.org/wp/2010/06/04/average-of-top-5-values
Ich habe eine Function mit einer Schleife geschrieben, aber vielleicht d...
25.11.2015 12:32:03
Thread-ID: 1460616
10 Beiträge
vba index(array) debug-resistenter Fehler
Michael

Hi zusammen,
ich pfriemle grad an einer saublöden Geschichte herum, bei der ich langsam nicht mehr weiß, wo ich hinlangen soll, um den Fehler zu finden.
Es handelt sich um zwei sehr ähnliche Subs, die aus einem 2D- array Daten spaltenweise wegschreiben.
i ist die Spalte im Zielblat...
20.12.2015 18:20:17
Thread-ID: 1465286
4 Beiträge
vba Array erstellen
Monika

Hey
gibt es noch eine elegantere Lösung für die Erstellung eines Arrays, dass man gleich zu Beginn die Werte festlegen kann
Mein Code:
Dim Farbe(6) As Integer
Farbe(1) = 32
Farbe(2) = 9
Farbe(3) = 46
Farbe(4) = 10
Farbe(5) = 3
Farbe(6) = 4
14.12.2016 16:34:03
Thread-ID: 1530160
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