Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
496to500
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
496to500
496to500
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Matrix durchsuchen

Matrix durchsuchen
13.10.2004 01:42:02
manni
Hallo,
ich habe folgendes Problem.
Eine größere Matrix muß durchsucht werden, ein bestimmter Wert kommt öfter vor. Wird der Wert gefunden, so müssen die Werte drei Zeilen weiter addiert werden.
Beispiel:
https://www.herber.de/bbs/user/12018.xls
Es wird der Wert 58 in der Matrix gesucht.
Die gefundenen Werte drei Zeilen weiter müssen addiert werden.
58 wird viermal in der Matrix gefunden, drei Zeilen weiter stehen die Werte:
10696,10562,9357,9357. Diese Werte müssen addiert werden.
Noch ein Problem mit der gleichen Matrix:
Es wird der Wert 79 gesucht.
79 wird fünfmal in der Matrix gefunden
Wenn vier Zeilen weiter "weniger" steht, so muss der Wert der hinter "weniger" (in der gleichen Zelle) steht addiert werden.
"weniger" wird vier Zeilen hinter 79 dreimal gefunden.
hinter "weniger" werden die Werte 2,1,3 gefunden. Diese Werte müssen addiert werden. =6
In einer weiteren Zelle muss gezählt werden wieoft "weniger" (mit unterschiedlichen Werten dahinter) gefunden wird.
Hier wird zB. dreimal 79 mit vier Zeilen weiter "weniger" gefunden
Ich hoffe es ist nicht zu sehr verwirrend. Danke schon mal.
Manni

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

Betreff
Datum
Anwender
Anzeige
AW: Matrix durchsuchen__TEILLÖSUNG
13.10.2004 08:23:58
MRP
Hallo Manni,
schreibe in A21: 58 und in B21: =SUMMENPRODUKT(($A$5:$A$18=A21)*$D$5:$D$18)
Das mit dem weniger ist etwas wirr erklärt, zumindest versteh ichs nicht ganz. Meine jedoch, dass es wohl einfacher zu lösen wäre, wenn hinter dem weniger nicht auch noch ne Zahl stehen würde.
Ciao
Manuele Rocco Parrino
AW: Matrix durchsuchen__TEILLÖSUNG
manni
Hallo MRP,
erst mal Danke, aber hilft mir nicht. Die ganze Tabelle (A5:N18) soll durchsucht werden.
Leider steht hinter dem "weniger" eine Zahl !
Danke
manni
AW: Matrix durchsuchen
13.10.2004 08:58:53
PeterG
Hallo Manni,
hier ein etwas anderer Ansatz
Sub WirSuchen()
Dim gesucht As Double, Summe As Double
gesucht = 51
Summe = SuchVar(gesucht, "A1:J25", "Tabelle1")
Sheets("Tabelle2").Cells(1, 1) = Summe
End Sub 

Private Function SuchVar(Var#, Bereich$, Blatt$) As Double
Dim Zelle As Range, ersteAdresse$, Wert As Double
With Worksheets(Blatt).Range(Bereich)
Set Zelle = .Find(Var, LookIn:=xlValues, LookAt:=xlWhole)
If Not Zelle Is Nothing Then
ersteAdresse = Zelle.Address
Wert = Zelle.Offset(3, 0)
Do
Set Zelle = .FindNext(Zelle)
Wert = Wert + Zelle.Offset(3, 0) '<-- 3 Zeilen weiter
Loop While Not Zelle Is Nothing And _
Zelle.Address <> ersteAdresse
End If
End With
SuchVar = Wert
End Function

Gruß
Peter
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige