Sortiert ein Excel-Bereich auf Double-Click
Wenn Sie Ihre Excel-Berichte für Ihre Kunden verteilen, ist es oft schön, ein paar Glocken und Trillerpfeifen hinzuzufügen. Eine der einfacheren Erweiterungen anzuwenden, ist die Fähigkeit zu sortieren, wenn ein Spaltenkopf doppelgeklickt wird. Obwohl dies auch klingen mag kompliziert, ist es relativ mit diesem Makro einfach.
Sie können ein funktionierendes Beispiel für diese herunterladen Doppelklick Technik in Excel.
Wie die Makro funktioniert
In diesem Makro finden Sie zuerst die letzte nicht leere Zeile. Sie verwenden dann diese Zeilennummer den Zielbereich der Zeilen zu definieren, die Sie sortieren müssen. Mit Hilfe der Sort-Methode, sortieren Sie die Zielzeilen durch die Spalte, die Sie geklickt verdoppelt.
Private Sub Worksheet_BeforeDoubleClick (ByVal Target As Range, Cancel As Boolean) 'Schritt 1: Erklären Sie Ihre VariablesDim LastRow Als Long'Step 2: Finden Sie letzte nicht leere rowLastRow = Cells (Rows.Count, 1) .End (xlUp) .Row' Schritt 3: Sortieren aufsteigend auf doppelgeklickt columnRows ( "6" LastRow) .Sort _Key1: = Cells (6, ActiveCell.Column), _Order1: = xlAscendingEnd Sub
In Schritt 1 deklarieren Sie eine Variable Long Integer genannt LastRow die Zeilennummer der letzten nicht leeren Zeile zu halten.
In Schritt 2 erfassen Sie die letzte nicht leere Zeile im Arbeitsblatt in der allerletzten Reihe beginnt und die End-Eigenschaft verwenden, um die erste nicht leere Zelle zu springen (Äquivalent A1048576 zu Zelle gehen und durch Drücken von Strg + Shift + Pfeil nach oben).
Beachten Sie, dass Sie die Spaltennummer in dieser Zelle so zu ändern, müssen die für Ihre Datensatz geeignet ist. Zum Beispiel, wenn Sie Ihre Tabelle auf Spalte J beginnt, müssen Sie die Anweisung in Schritt 2, um Zellen (Rows.Count, 10) .End (xlUp) .Row zu ändern, weil Spalte J die 10. Spalte in dem Arbeitsblatt ist.
In Schritt 3 legen Sie die Gesamtzeilenbereich für Ihre Daten. Beachten Sie, dass der Bereich der Zeilen hat mit der ersten Reihe von Daten zu starten (ohne Header) und endet mit dem letzten nicht leeren Zeile. In diesem Fall beginnt Ihr Datensatz auf Zeile 6, so dass Sie verwenden die Sort-Methode auf Zeilen ( "6" Letzte Reihe).
Das Hauptargument sagt Excel, die auf zu sortieren reichen. Auch hier werden Sie wollen, um sicherzustellen, dass der Bereich, den Sie mit der ersten Reihe von Daten verwenden, beginnt (mit Ausnahme der Header).
Wie das Makro zu verwenden,
Um dieses Makro zu implementieren, müssen Sie kopieren und fügen Sie ihn in der Worksheet_BeforeDoubleClick Ereigniscode-Fenster. das Makro hier Platzierung ermöglicht es jedes Mal, wenn Sie einen Doppelklick auf das Blatt zu laufen:
Visual Basic-Editor aktivieren, indem Sie ALT + F11 drücken.
Im Projekt-Fenster finden Sie Ihr Projekt / Arbeitsmappe Namen und klicken Sie auf das Pluszeichen neben ihm alle Blätter zu sehen.
Klicken Sie auf das Blatt, von dem Sie den Code auslösen möchten.
In der Event-Dropdown-Feld, wählen Sie das Ereignis Before.
Geben oder fügen Sie den Code.
