Ich hab die Sache, mangels Fähigkeit deinen Vorschlag umzusetzen , jetzt recht unelegant gelöst und bekomme dann zu einer solchen Darstellung:
Überschuss /Mangel |
Vorzeichen |
Dauer |
|
-1 |
-1 |
0 |
|
-2 |
-1 |
0 |
|
-5 |
-1 |
3 |
|
2 |
1 |
0 |
|
1 |
1 |
2 |
|
Er Vergleicht also in einer Schleife die Vorzeichen und addiert für jedes gleiche Vorzeichen +1 (Zeitschritt/Tage), Weil er bei 0 anfängt zu zählen addiere ich am Ende +1 auf alle Werte die ungleich 0 sind.
Spalte 12 ist die Dauer, Spalte 11 das Vorzeichen:
For x = 10 To 80
Cells(x, 12) = 0
Next
For x = 10 To 80
If Cells(x, 11) = Cells((x - 1), 11) Then
Cells(x, 12) = Cells((x - 1), 12) + 1
End If
Next
For x = 10 To 80
If Cells(x, 12) > Cells((x - 1), 12) Then
Cells((x - 1), 12) = 0
End If
Next
For x = 10 To 80
If Cells(x, 12) <> 0 Then
Cells(x, 12) = Cells(x, 12) +1
End If
Next
Is nicht schön funktioniert aber ^^
(gerne nochmal einen Vorschlag wie es eleganter geht)
Was ich jetzt gern hätte wäre dass er mir die Dauerspalte nach positiv und negativ sortiert und ohne Nuller untereinander schreibt.
Also eine Übersicht über die verschiedenen Bestandszeiträume. Bsp:
+ -
-1 0 3 4
-1 0 2 3
-1 0
-1 4
1 0
1 0
1 3
-1 0
-1 0
-1 3
1 0
1 2
Wie immer Dankbar für jede Hilfe und auch Grundlagentipps mangels Erfahrung nicht abgeneigt ; )
Gruß Stoic
|