hi
ich hab ein problem.
ich suche in einer spalte mit zahlen, den minimal wert.
ich geh da jeden wert durch und guck ob dieser kleiner ist als der davor und wenn ja dann ist es das neue minimum.
so und jetzt das problem.
Wenn man als einen Integer als Variable benutzt dann hat diese als default die 0.
Und wenn man nun guckt ob die Zahl kleiner ist als das momentane min(=0 per default) dann ist es niemals der fall(ausser halt die negativen zahlen).
man könnte als start-vergleichswert 2147483647 nehmen. aber geht das auch irgendwie anders ?
Dim min as Integer '0
for i=0 to letzteZeile
betrag = Sheets(1).Cells(i, SPALTE_BETRAG)
if min < betrag then
min = betrag
end if
next i
|