top ten werte filtern und kopieren vba
22.02.2020 16:40:55
Karsten
ich versuche gerade folgendes und finde keinen Ansatz bzw auch keine passenden Themen dazu. Per auto filter erstelle ich die top 15 werte, wobei aber ca 25 Werte angezeigt werden, da es mehrere gleiche Werte gibt. Soweit ist auch alles okay aber ich möchte davon nur die ersten 15 werte kopieren und in ein anderes Tabellenblatt einfügen. Im Forum habe ich nur einen Befehl gefunden, der mir den sichtbaren Bereich kopiert
ActiveSheet.Range("$A$6:$CG$20000").AutoFilter Field:=62, Criteria1:="15", _
Operator:=xlTop10Items
Range("E3:H20011").Select
Selection.SpecialCells(xlCellTypeVisible).Copy
wie würde die Eingabe lauten müssen, wenn ich bei E3 : H? die 15 sichtbaren Zeilen kopieren möchte?
Ich danke schone einmal
Karsten