Supportnet / Forum / Tabellenkalkulation

Hi *, hier noch einmal ein kleines Problem. Ich möchte per VBA den Min & Max - Wert einer Spalte ermitteln. In diese Spalte kann unter Umständen ausser Zahlen auch noch Strings & Leerzellen sein. Hat jemand eine Idee für einen schnellen & schlanken Code? Muss man evtl. umkopieren in ein neues Blatt...o der??? Danke!

Hallo,

muß Min und Max aus irgendeinem Grund per VBA ermittelt werden?

Sonst Funktionen MIN() und MAX() benutzen, texte Leerfelder werden ignoriert.

Gruß

Helmut

Hallo,

hier der VBA-Code zum Ermitteln von MIN und MAX aus den Werten der Spalte A.

Sub minmax()
Range("B1").Value = Application.WorksheetFunction.Min(Range("a:a"))
Range("C1").Value = Application.WorksheetFunction.Max(Range("a:a"))
End Sub

Gruß
Rainer

Hallo Helmut,

ich denke ja.
Folgende Situation: Ich habe viele Tabellenblätter mit vielen Daten (bis zu 40000 Zeilen) in verschiednen Dateien. Dort muss ich Anhand verschiedener Parameter (die auch öfters vorkommen) z.B. die Min & Max Werte filtern. Ich bin gerade dabei ein Userform dafür zu machen. Umkopieren, wenn Autogefiltert hat dauert zu lange. Ich möchte eigentlich nur den Wert aus den ganzen Zeilen ermitteln und farbig markieren. Problem mit dem Autofilter ist, so weit mein Kenntnisstand, alle Werte betrachtet werden
auch wenn dort Zellen mit anderen Werten wom Filter ausgeblendet werden. Gefilterte Daten z.B. von A40:A70; A501:A900; usw. Die Werte von A71 bis A501 gehen dann aber mit in die Betrachtung von {=Min(A40.....)} ein. Daher die Überlegung VBA und programmieren.

Gruß

Hallo,

ich glaube der Vorschlag von @rainger bringt dich ans Ziel. Sollte es nicht ausreichen, nochmal melden.

Gruß

Helmut

Danke!
Klappt super!

Gruß

• Durchschnittswwert ermitteln
• Bedingt. Formatie. MAX und MIN
• Excel Diagramm mit 3 Y-Achsen programmieren
• Excel Summewenn mit Min und Max Angabe
• Max-Wert und zugehöriges Datum ermitteln