Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1540to1544
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
Inhaltsverzeichnis

Suchkriterium mit Datum von bis

Suchkriterium mit Datum von bis
12.02.2017 11:34:26
bis
Hallo alle zusammen,
gesucht werden soll das Teil aus Spalte A mit dem Zeitraum der Spalte B.
Gesucht werden soll dann in der Spalte E und der Zeitraum von Spalte F und G muss in dem Zeitraum von SpalteB liegen.
Wurde eine Übereinstimmung gefunden, dann soll der Preis aus Spalte H wieder gegeben werden.
In dem nachfolgenden Bsp. habe ich die Spalte C manuell befüllt, wofür ich gern eine Formel hätte.
Userbild
Hier auch die Datei https://www.herber.de/bbs/user/111393.xls
Ich hoffe mir kann jemand helfen.
Vielen Dank im Voraus!
MFG Andre

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suchkriterium mit Datum von bis
12.02.2017 13:06:06
bis
Hi,
Private Sub CommandButton1_Click()
Dim z, z2, such, von, bis As Variant
For z = 3 To 100
such = Tabelle1.Cells(z, 2)
If such  "" Then
For z2 = 3 To 100
von = Tabelle1.Cells(z2, 6)
bis = Tabelle1.Cells(z2, 7)
If von  "" Then
If such >= von And such 

Gruß
Onur
AW: Suchkriterium mit Datum von bis
12.02.2017 13:31:50
bis
Hallo,
Erstmal Danke für Deine Unterstützung.
Hier soll aber auch nach dem Teil aus SpalteA gesucht werden und nicht nur die Datumswerte.
Also suche nach dem Teil aus SpalteA, dies muss in SpalteE gefunden werden, dann muss noch geprüft werden ob das Datum von SpalteB im Zeitraum von Spalte F und G liegt.
Userbild
MFG Andre
Anzeige
AW: Suchkriterium mit Datum von bis
12.02.2017 13:49:00
bis

Private Sub CommandButton1_Click()
Dim z, z2, such, von, bis, id, id2 As Variant
For z = 3 To 100
id = Tabelle1.Cells(z, 1)
such = Tabelle1.Cells(z, 2)
If such  "" Then
For z2 = 3 To 100
id2 = Tabelle1.Cells(z2, 5)
von = Tabelle1.Cells(z2, 6)
bis = Tabelle1.Cells(z2, 7)
If id = id2 Then
If such >= von And such 

AW: eine VERWEIS()-Formel reicht aiuch ...
12.02.2017 13:51:02
...
Hallo Andre,
... für alle XL-Versionen:
=WENN(ISTNV(VERWEIS(9;1/(E$1:E$99=A3)/(F$1:F$99=B3);H:H))
;"nicht gefunden";VERWEIS(9;1/(E$1:E$99=A3)/(F$1:F$99=B3);H:H)) 
und Formel nach unten kopieren.
Für XL-Versionen ab 2007 ist es kürzer:

=WENNFEHLER(VERWEIS(9;1/(E$1:E$9=A3)/(F$1:F$9=B3);H:H);"nicht gefunden")
Gruß Werner
.. , - ...
Anzeige
AW: eine VERWEIS()-Formel reicht aiuch ...
12.02.2017 14:55:26
Andre´
Hallo Werner,
auch dir vielen Dank für die Lösung, funktioniert wie gewünscht :-)
MFG Andre

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige