Es kommt aber gelegentlich vor dass die auszuwertenden Zellen anstatt eines Zahlenwerts nur einen Strich - wegen eines fehlenden Messwertes enthalten. in diesem Fall enthalten die 3 Textfelder auch nur einen Strich - (Fall 1). Im Fall 2 wird der Wert 0,0° fälschlicherweise ebenfalls nur als Strich - angezeigt.
Die Anzeige im Fall 3 ist richtig; ebenso die im Fall 4 angezeigte Lösung.
Die Frage ist nun, wie müsste die Abfrage lauten um eindeutig zwischen Strich - und 0,0° zu unterscheiden, das Ergebnis soll wie im Fall 2 erwartet dargestellt aussehen?
Set Bereich3 = ActiveSheet.Range(Cells(vAnfang.Row, 3), Cells(vEnde.Row, 3))
Bereich3.Select
txtMin1 = Format(Application.WorksheetFunction.Min(Bereich3), "0.0 °")
txtMW = Format(Application.WorksheetFunction.Average(Bereich3), "0.0 °")
txtMax1 = Format(Application.WorksheetFunction.Max(Bereich3), "0.0 °")
Fall 1:
--------------------
Zelle1: -
Zelle2: -
--------------------
txtMin: -
txtMW: -
txtMax: -
Fall 2:
--------------------
Zelle1: -
Zelle2: -
Zelle3: 0,0°
--------------------
txtMin: -
txtMW: -
txtMax: -
Fall 3:
--------------------
Zelle1: -
Zelle2: -
Zelle3: 5,0°
--------------------
txtMin: 5,0°
txtMW: 5,0°
txtMax: 5,0°
Fall 4:
--------------------
Zelle1: -
Zelle2: -
Zelle3: 5,0°
Zelle4: 0,0°
--------------------
txtMin: 0,0°
txtMW: 2,5°
txtMax: 5,0°
Fall 2erwartet:
--------------------
Zelle1: -
Zelle2: -
Zelle3: 0,0°
--------------------
txtMin: 0,0°
txtMW: 0,0°
txtMax: 0,0°
Die Frage ist nun, wie müsste die Abfrage lauten um eindeutig zwischen Strich - und 0,0° zu unterscheiden, das Ergebnis soll wie im Fall 2erwartet dargestellt aussehen? Ich habe bereits mehrere Varianten ohne Erfolg ausprobiert, vielleicht muss auch die Abfrage anders formuliert werden.
Falls jemand einen Vorschlag hat bitte ich um Rückmeldung.
Gruß Reiner