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!!!
Anzeige