Office: Größten Wert in einer Spalte finden und ..

Hallo zusammen,

könnte mir jemand helfen?

Ich benötige folgendes:
In der Beispieldatei ist eine Tagesqualität abgebildet. Ich benötige ein VBA Makro, welches mir den größten Wert aus dem Bereich (E3:E22) findet und mir dann die entsprechende Uhrzeit zu diesem Wert aus Spalte A zurück gibt.

Hat da jemand ne Idee?

Danke und viele Grüße
Till :-)

:)

 

Hallo Till,

Muss es VBA sein ?
Formel wäre:

=INDEX(A3:A22;VERGLEICH(MAX(E3:E22);E3:E22;0))

Äquivalent als VBA mit WorksheetFunction.

 

Hallo Till (nochmals),
Im Betreff steht: Kleinsten Wert in einer Spalte finden
Im Text steht: ...den größten Wert aus dem Bereich

Im Fall 1 als Formel:
=INDEX(A3:A22;VERGLEICH(MIN(E3:E22);E3:E22;0))
Im Fall 2 als Formel:
=INDEX(A3:A22;VERGLEICH(MAX(E3:E22);E3:E22;0))

 

Hi EtoPHG,

danke für den Hinweis, hab die Überschrift angepasst.

Ja es muss VBA sein, da ich mit diesem Wert im VBA Skript weiterarbeiten muss. Ich werde dann eine Funktion erstellen, die ich immer wieder aus dem VBA Skript aufrufen kann. Aber danke für deine Antwort! :-)

Viele Grüße
Till :-)

 

Hallo Till,

Also in VBA:
Code:

 

Danke EtoPHG!

Das hilf mir!! :-)

 

Hallo Till, hallo Hansueli,

dieser Thread bietet sich an, mal eine Frage zu stellen:

Ich verfahre oft so, dass ich in größeren Anwendungen mir ein "Optionssheet" anlege. D.h. Werte, die ich öfter brauche, wie in Tills Fall, schreibe ich mir per Formel in mein "Optionssheet" und im Lauf der weiteren Programmierung greife ich immer auf das Ergebnis dieser Zelle zu. Ist das empfehlenswert?? Performance??

Klar, könnte man das auch in ein Sub oder in eine Funktion einbauen. Aber ich habe es mir so wie beschrieben mittlerweile zur Gewohnheit gemacht, weil ich die Formel schnell mal ändern und anpassen kann, mit dem Nebeneffekt, dass ich viele meiner Programmvariablen auf einen Blick verfügbar habe.

Wie gesagt: Ob es eine "dumme" Angewohnheit ist, weiß ich nicht, ich find sie übersichtlich und Performanceprobleme hatte ich dadurch bislang nicht. Viele Wege führen ja bekanntlich nach Rom...

Was meint ihr? Würde mich wirklich interessieren!!

Grüße
Costi

Edit: Soll absolut nicht Hansuelis Lösungen in Frage stellen!

 

Hallo Costi,

Vom Programmierstil her, mache ich es praktisch gleich wie Du, d.h. ich speichere mir vieles lieber auf versteckten Blättern (xlSheetVeryHidden!). Ich finde das absolut performant. Die Excelfunktionen sind ja meist sehr schnell und was soll ich mir einen neuen Weg nach Rom suchen? *biggrin.gif*

 

Hi Leute,

erstmal Danke für die vielen Hilfreichen Tipps! Dieses Script soll dazu dienen den Zeitpunkt der Mittagspause für die Mitarbeiter festzulegen. Die Mittagspause soll natürlich dann geplant werden, wenn am meisten luft dafür ist. Jetzt gibt es folgendes Problem: Die Mittagspause darf frühestens 3 Stunden nach Arbeitsantritt und muss spätestens 2 Stunden vor Arbeitsende geplant werden.

D.h.: Wenn ein Mitarbeiter von 8:00 bis 16:30 arbeitet dann muss ich den größten wert aus der Spalte zwischen 11:00 Uhr und 14:30 (14,5) Uhr finden. Dies soll aber automatisch geschehen, je nach Arbeitszeit (für ca. 100 Mitarbeiter). Wie könnte man das ambesten realisieren? Ich denke da an eine funktion finde_mittagspause(), die den Wert Arbeitsanfang und Arbeitsende bekommt und einen bereich zurück gibt. Geht das?

Viele Grüße
Till :-)

 

Hallo Till,

Ich denke das ist ein Optimierungsproblem, das Deine aber auch Excel's Möglichkeite bei weitem überfordern.

Gruss Hansueli

 

Hallo Leute,

ich brauch hierzu nochmal hilfe! Wenn ich bei der Zeile:

MsgBox WorksheetFunction.Index(thatRange, WorksheetFunction.Match(WorksheetFunction.Max(thisRange), thisRange, 0))

Auf ein angeres Tabellenblatt zugreifen will, bsp. Tabelle 10, wie sieht das dann aus? Ich meine damit, die WorksheetFunction soll auf der Tabelle10 ausgeführt werden.

Danke und viele Grüße
Till *Smilie

 

Moin, Till,

den Bezug zu der Tabelle herstellen - ohne Angabe wird immer der Bezug zur aktiven Tabelle hergestellt. Ohne Prüfung könnte es so aussehen:

Code:

Ansonsten müsste der Tabellenname direkt vor dem Bereich angegeben werden, wenn nicht mit Objekten gearbeitet werden soll.