KGrößte per VBA
22.09.2021 18:28:16
M@tt
ich habe eine Frage zur VBA Funktion von "KGrößte"
Ich möchte von einem anderen Tabellenblatt, dessen Namen über eine Variable "Name" festgelegt wird in eine weitere Tabelle die 3 höchsten Werte der eintragen.
Mir gelingt es nur in dem Tabellenblatt selbst, da mein Code eben nicht für meinen Zweck taugt.
Was müsste ich ändern um ein anderes Tabellenblatt anzusprechen?
Hier mein Code, der leider nur im aktiven Blatt funzt ;-)
Sub Groesste()
Dim dbl As Variant
dbl = Application.WorksheetFunction.Large(Range("A2:A12"), 1)
Cells(1, 3).Value = dbl
dbl = Application.WorksheetFunction.Large(Range("A2:A12"), 2)
Cells(2, 3).Value = dbl
dbl = Application.WorksheetFunction.Large(Range("A2:A12"), 3)
Cells(3, 3).Value = dbl
End Sub
Vielen Dank für Eure Zeit, Gruß Matthias