Re: excel 2003 Sortieren



Am Sun, 1 Jul 2007 05:56:01 -0700 schrieb Christoph:

Vielen Dank!
das klingt spannend - brauche da aber noch eine kleine Nachhilfe zur
Verwendung von Makros:

wenn ich die Tabelle entsprechend formatiert habe (ÜS zeile 4)
dann gehe ich auf Extras - Makros - und dann?
was muß ich wo eingeben und wie kann ich dann das Makro nutzen?????

Christoph

Hallo Christoph,

ich nehme nun mal an, dass dies Dein erster Makro ist, also gebe ich Dir
hier eine kleine Anleitung wie Du das Ding ans Laufen bringen kannst.

Starte Excel ganz normal und wenn Du ein leeres Arbeitsblatt
vor Dir hast, dann halte die Alt-Tast fest und tippe auf F11
und Du landest im VBA Projekt.

Nun Stelle den Cursor auf den Text "DieseArbeitsmappe"
und wähle die Option Einfügen Modul,
dann bekommst Du das Modul1

Nun tippe das Modul1 mit einem Doppelklick auf der linken
Maustaste an und dann landest Du im Modul.

Schreibe nun in die oberste Zeile:

Option Explicit

das brauchst Du zwar nicht für den VarioMakro aber das gibt Dir
später einmal eine Fehlermeldung wenn Du Fehler gemacht hast.

Nun kopiere meinen MakroCode

Sub SortVario()
Dim SortSpalte
SortSpalte = ActiveCell.Column

Rows("4:2000").Sort Key1:=Cells(4, SortSpalte), Order1:= _
xlAscending, Header:=xlYes, OrderCustom:=1 _
, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

darunter und dann ist Dein Makro schon fertig.
Er wohnt im Modul Nr. 1

Klicke nun den Karteireitr Excel Mappe1 an und Du bis zurück
im Excel Arbeitsblatt.

Nun wollen wir gemeinsam einen Button bauen.

Es gibt verschiedene Button, wir nehmen hier den einfachen
weil der für den Anfang halt einfacher ist.

Wähle dazu in Excel das Menü Ansicht und dann Symbolleiste
und mache einen Haken bei Formular.

Nun hast Du einen Werkzeugkasten für viele Anwendungen.
Wir wollen aber nur einen Button bauen.
Dazu brauchen wir den kleinen Knopf der rechts neben dem
Gruppenfeld XVZ steht und sich Schaltfläche nennt wenn Du mit
dem Cursor darüber fährst.

Mit der linke Maustaste diese Schaltfläche anklicken und Du wirst
sehen, das sich der Cursor wenn dur in die Tabelle zurück gehst
in ein dünnes Kreuz verwandelt hat.

Nun gehe irgendwo in die Tabelle, in die Zeile 1 oder 2 und
tippe mit die linken Maustaste an, halte fest und ziehe von
links nach rechts und dann loslassen und schon hast Du einen Button
auf der Tabelle.

Gleich danach wirst Du gefragt: Makro zuweisen und dann tippe
halt auf SortVario und dann hast Du dem Button einen Makrocode,
nämlich den Code SortVarion zugewiesen, nun nur noch OK und
zurück zur Tabelle.

Als erstes mal die Tabelle speichern, damit nichts verloren geht.

Nun schreibe für denersten Versuich mal Überschriften in die Zeile 4
und dann ganz nach Wunsch Daten in die Spalten darunter, also ab Zeile 5
bis maximal 2000, weil der MakroCode auf 2000 Zeilen eingestellt ist.

Der Makro sortiert nur ganze Zeilen, wählt allerdings jeweils
die markierte Spalte zum Sortieren der Zeilen.

Nun probiere mal aus.

Viel Spaß

Robert
.



Relevant Pages