ich habe einen Bereichsnamen über mehrere Zellen vergeben. In diesen Zellen stehen unterschiedliche Datumsangaben. Nun möchte ich in einem Makro den geringsten/frühesten Datumswert auslesen.
Weiß dafür jemand eine Möglichkeit ?
Grüße
Range("DeineZelle").FormulaLocal = "=MIN(DeinBereichsname)"
So wird der Min-Wert direkt in deine Zelle ausgegeben.
Willst du den Min-Wert einer Variablen zuweisen, dann versuch es so:
Dim DeineVariable As Date
Range("DeineHilfsZelle").FormulaLocal = "=MIN(DeinBereichsname)"
DeineVariable = Range("DeineHilfsZelle").Value
Range("DeineHilfsZelle").Value = ""
Hier wird einer Hilfszelle erst mal der Min-Wert zugewiesen, den du im 2. Schritt an die Variable übergibst. Im 3. Schritt wird der Inhalt der Huilfszelle wieder gelöscht.
Hilfts?
Ciao
Thorsten
DeineVariable = Application.Min(Range(DeinBereichsname))