Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
608to612
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
608to612
608to612
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Min - Max

Min - Max
11.05.2005 13:42:29
Gehrling
Hallo!
Ich habe eine Matrix mit Daten (A1:Z360).
Nun soll in einer neuen Tabelle (soll neu angelegt werden) in Spalte A folgendes automatisch ausgegeben werden:
A1 abgerundeter Min-Wert der Matrix auf ganze Zahl (ohne Komma)
A2 abgerundeter Min-Wert + 0,5
A3 abgerundeter Min-Wert + 1,0
.
.
.
bis zum aufgerundeten Max-Wert auf ganze Zahl
Kann mir da jemand helfen?
Gruß Diana

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Min - Max
11.05.2005 14:06:18
u_
Hallo,
in ein Modul:

Sub Min_Max()
Dim min As Single, max As Single, i As Single
With Application.WorksheetFunction
min = .RoundDown(.min(Range("A1:Z360")), 0)
max = .RoundUp(.max(Range("A1:A360")), 0)
End With
Sheets.Add after:=Sheets(1)
For i = min To max Step 0.5
Cells(65536, 1).End(xlUp).Offset(1, 0) = i
Next i
End Sub

Gruß
AW: Min - Max
11.05.2005 14:21:57
Luc:-?
Hallo Diana,
hier mal eine "klassische" Formellösung:
A1=ABRUNDEN(MIN(namebasistab!$A$10:$Z$360);0)
A2=WENN(A1+0,5<AUFRUNDEN(MIN(namebasistab!$A$10:$Z$360);0);A1+0,5;WENN(A1=AUFRUNDEN(MIN(namebasistab!$A$10:$Z$360);0);"";AUFRUNDEN(MIN(namebasistab!$A$10:$Z$360);0)))
A2 dann runterziehen bis keine Werte mehr errechnet wdn, sondern Zellen "leer" bleiben.
Gruß Luc :-?
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige