Ich finde es einfach nicht :(
29.01.2018 11:35:18
Burak
ich suche und suche den Fehler aber finde ihn nicht in folgendem Code:
Summe = 0
For n = 3 To .Cells(Rows.Count, 5).End(xlUp).Row
If (.Cells(n, 14).Value > 0.9166666 And .Cells(n, 1).Value .Cells(n - 1, 1).Value And . _
Cells(n, 13).Value >= startdatum And .Cells(n, 13).Value .Cells(n - 1, 1).Value And .Cells(n, 13).Value > startdatum And .Cells(n, 13).Value
Er soll ne Liste abarbeiten und den Wert aus Spalte 5 summieren wenn:- in Spalte 14 der Wert über 0,91666 (21:59 Uhr) liegt UND
- in Spalte 1 sich der Wert zur Zeile darüber verändert hat UND
- in Zeile 13 das Datum zwischen dem eingebenen startdatum und dem eingegebenen enddatum liegt (inklusive)
ODER
- in Spalte 14 der Wert unter 0,25 (06:00 Uhr) liegt UND
- in Spalte 1 sich der Wert zur Zeile darüber verändert hat UND
- in Zeile 13 das Datum zwischen dem eingebenen startdatum und dem eingegebenen enddatum + 1 liegt (inklusive)
also in meinem Fall gebe ich startdatum 18.01.2018 und enddatum 18.01.2018 ein, aber er nimmt zB auch einen Wert vom 20.01.2018 etwa 01:00 Uhr morgens.
Bei diesem datum möchte ich aber nur dass er von 18.01.2018 22:00Uhr bis 19.01.2018 05:59:59 überprüft
Denke das Problem liegt iwo an den ganzen AND und dem Or
Vllt ist das auch ohne Beispieldatei verständlich, sonst Bescheid geben.
Freundliche Grüße und Vielen Dank im Voraus!!!