Tabelle sortieren
#1
Guten Abend,
ich bin neu in dieser Gruppe und habe folgende Frage:

Ich habe eine feste 18-zeilige Tabelle. Diese Tabelle wird mit mehr oder weniger Zeilen-Informationen gefüllt. In der Regel ist die Tabelle nicht voll.- In Spalte C werden die Werte aus Spalte E übertragen.
Am Ende soll die Tabelle nach Spalte "Ergebnis" absteigend sortiert werden.- Das Ganze soll automatisiert über ein Makro gesteuert ablaufen. 
Ich wollte das Ganze über "Makro aufzeichnen" realisieren. Hier komme ich aber nicht weiter.
Nun sind meine VBA-Kenntnisse sehr sehr bescheiden.

Wer kann mir hier einen guten Tipp geben?


Angehängte Dateien
.xlsx   TestTabelle.xlsx (Größe: 10,79 KB / Downloads: 9)
Antworten Top
#2
Hi,

1. Warum sortierst Du nicht nach Spalte E?
2. Warum werden die Werte von E nach C übertragen?

Code:
Private Sub Worksheet_Change(ByVal target As Range)
If Intersect(target, Range("E4:E20")) Is Nothing Then Exit Sub
Application.EnableEvents = False
loletzte = Cells(Rows.Count, 2).End(xlUp).Row
Range("B3:E" & loletzte).Sort Key1:=Range("C3"), Order1:=xlDescending
Application.EnableEvents = True
End Sub
reagiert auf jede Änderung in E
Gruß

Edgar

Meine Antworten sind freiwillig und ohne Gewähr!
Über Rückmeldungen würde ich mich freuen.
[-] Folgende(r) 1 Nutzer sagt Danke an BoskoBiati für diesen Beitrag:
  • Lausbub
Antworten Top
#3
Hallo,
 
soll das sortierte Ergebnis innerhalb der Tabelle bleiben, dann kannst du einfach Sortieren via Spalte C mit Boardmitteln (Daten--> Sortieren/Filten-->abwärts sortieren).
Da braucht es kein VBA.
Ansonsten kann man dies mit dem Markrorekorder aufzeichnen und die vielen Selections entfernen.
Das sollte auch auf dem MAC so klappen.
 
Gruß Uwe
Antworten Top
#4
Hallo,

du kannst doch die leeren Zellen ohne Namen rausfiltern und dann sortieren:

=SORTIEREN(FILTER(B4:E20;B4:B20<>"");2;-1;0)
Cadmus
[-] Folgende(r) 1 Nutzer sagt Danke an Cadmus für diesen Beitrag:
  • theTroother
Antworten Top
#5
Danke für Deine Hilfe.- Dein Tipp hat mir neue Anregungen gegeben.
Gruß Lausbub
Antworten Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste