Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA - Wert neben Min ausgeben

VBA - Wert neben Min ausgeben
19.03.2007 11:14:00
Berni
Guten Tag
Ich möchte den Wert, welcher links neben dem Minimum in einer Liste steht ausgeben mittels VBA. Weiss aber nicht wie das geht.
Das Minimum aus Spalte B kann ich erfassen (Application.WorksheetFunction.Min(Range("B:B"))); ich will aber den danebenstehenden Wert aus Spalte A.
Wie geht das? Ich wäre froh wenn mit jemand helfen könnte.
MfG Berni
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: VBA - Wert neben Min ausgeben
19.03.2007 11:27:19
Mac4
Hallo Berni,
hier mal 2 Möglichkeiten - einmal über eine Objektvariabele und einmal per VBA-Formel:

Sub test()
Dim finden As Object
Set finden = [B:B].Find(WorksheetFunction.Min(Range("B:B")))
MsgBox Cells(finden.Row, "C")
MsgBox WorksheetFunction.Index([C:C], WorksheetFunction.Match(WorksheetFunction.Min(Range("B:B")), [B:B], 0))
End Sub
Marc
Anzeige
AW: VBA - Wert neben Min ausgeben
19.03.2007 11:36:00
Berni
Hallo Marc
Vielen Dank! Das hat super geklappt!
Mfg Berni
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige