Office: (Office 2010) Excel mit VBA sortieren nach mehreren Kriterien

Hallo. Ich habe folgendes Problem*rolleyes.gif*
Im Anhang ist eine Datei an der ich das Beispiel realisieren möchte. Also ichmöchte einen Button "Sortieren" realisieren, der folgendes vergleicht und sortiert: Ich habe 4Personen in Alterklasse(AK1). 3x Männlich und 1x Weiblich. Wenn man jetzt auf den Button klickt soll anhand der Gesamtpunktzahl unter den Männern sortiert werden. Da in AK1 nur eine Frau ist, wird bei Ihr automatisch 1 eigetragen. Das Gleiche soll mit Personen in AK2 und AK3 pasieren. Also kurz definiert: Beim Click auf den Button vergleicht er zuerst aller Personen mit AK1 und nach deren Gesamtpunktzahl und trägt dann in der vorgesehenen Zellen die Platzierung ein. Gleichzeitig soll er die Männer und Frauen seperat in der AK1 vergleichen. Ich glaube am einfachsten wird es sein, mit drei Button, wie z.B. sortieren AK1, AK2 und AK3.
Könnte mir hier jemand ein Beispiel schreiben, bitte*rolleyes.gif*

:)

 

Hi,

Version 2010 *Smilie

Ich habe mal was zum Klicken hinterlassen.

 

Ja, diese Lösung hatte ich auch schon durchgespielt. Problem dabei ist folgendes 1. Die Werte werden nicht aktualisiert. Also wenn ich z.B. bei Weiblich AK1 die Gesamtpunktzahl ändere, aktualisiert sich diese nicht. Außerdem wird dabei ein neues Dateblatt erzeugt.
Ich möchte, dass es im gleichen Tabellenblatt alles sortiert wird. Also das beim Klick auf "Aktualisieren AK1 männlich" werden alle Personen in der AK1 in die richtige Reinfolge gebracht und in der Spalte Platz wird dann automatisch für die Personen unter AK1 männlich 1-x eingetragen.

 

Hi,

nicht unbedingt *wink.gif*

 

Oder als Makro...

Wenn du schon von nem Button sprichst..
Code:

Grüße

 

Ok, TOP. Super. Nur noch eine letzte Sache. Habe versucht, bevor ich nachfrage, es selber zu erstellen aber wie immer geht es nicht*frown.gif*((
Also der Stein im Puzzle ist: Es wird sortiert nach den drei Kriterien: AK, Geschlecht, Gesamtpunktzahl. Jetzt habe ich die Spalte Platz. Dort soll automatisch eingetragen die Platznummer in der jeweiligen AK. Also in AK1 dann 1-3 und wieder unterscheiden zwischen männlich und weibelich.

 

Hallo

diese function löst die Benummerung

Du kannst sie mittels call aus deiner Sortierung heraus aufrufen

Code:

 

Hallo. Also Mega Dank für die Formeln. Ich habe diese in meine Excel-Datei übernommen aber die funktionieren nicht richtig. Ich erstelle eine Excel-Datei für unseren Hundeverein. Die Datei ist im Anhang. Ich habe im Tabellenblatt VK 1 den Button sortieren eingefügt. Jedoch übernimmt er die Werte nicht. Also wenn ich die Bonuspunkte eintrage und dann auf sortieren klicke werden überall wieder die Gesamtpunktzahl 255 eingetragen. Was stimmt da nicht?

 

Ich kann dir sagen warum es nicht Funktioniert.

In den Zellen sind keine Werte, sondern volatile Funktionen.
Dh sie aktualisieren sich immer wieder und geben den Ursprungszustand der Tabelle wieder aus
Du hast soeben das erste Excel- Perpeduum Mobile gebaut ^^

Geht so natürlich nicht..

Wer hat dir denn die Formeln in die Zellen geschrieben, und mit welchem Sinn und Verstand?

Grüße

 

Ich habe die Formeln geschrieben. Ich wollte die Eingabe automatisieren. Wenn ich im Tabellenblatt Namen etwas eintrage dann sollen die Eingaben automatisch in andere Tabellenblätter kopiet werden.

 

und das war die Einzige Methode, die funktioniert hat bzw. die ich geschafft habe anzuwenden.

 

Hi,

selber geschrieben….,tja *wink.gif*

die Formeln passen ja für eine Ausgabe *wink.gif*
und die Fragestellung wurde im vorigen Post behandelt..... ohne diese zusätzlichen Aufgabestellungen.

Meiner Meinung nach ist das Prinzip von EVA nicht verstanden worden. (Eingabe -> Verarbeitung-> Ausgabe) es wird nun versucht Ausgabe mit Eingabe zu vermischen, was nun mal nicht funktionieren kann.

Ausserdem wäre die Aufgabenstellung in einer DB besser aufgehoben( Kunden(Teilnehmer)daten, Tierdaten der jeweiligen Kunden, Auswertungen (Urkunden) usw...
Nur….., ich kenne deine Beiträge aus dem Accessforum.

Da es aber nicht allzu komplex ist wäre es sicherlich auch möglich dies in Excel umzusetzen.
Nur eben nicht mit diesem Aufbau.

 

Access kenne ich mich noch weniger damit aus wie mit Excel. Also versuche ich mir Informationen zusammen zu kriegen. Als ich die Excel-Formel hier bekommen habe, habe ich nicht gewusst, dass ich so einen Aktualisierungs-Button brauchen werde. Aber als es dann alles fertig war merckte ich, dass so ein Button Sinn machen würde.
Was und wie muss ich es jetzt umstellen, dass es funktioniert?

 

Im Zweifel würd ich die Daten auch per Makro Rüberziehen

Oder du liesst dich mal in Pivot ein. Das könnte ich mir für dein Problem auch gut vorstellen

Grüße

 

Hi,

@ Jack das mit Makro rüberziehen hatte ich im letzten Beitrag schon drinnen ^^ und Pivot hatte ich auch schon vorgeschlagen... *Smilie

@snboy
ich würde einmal Datentabellen erstellen
ein Tabellenblatt mit den Teilnehmerdaten und einer Schlüsselspalte (eindeutige Nummer oder Bezeichnung für den Teilnehmer)

Wobei sich jetzt aber die Frage für mich stellt, kann ein Teilnehmer mit mehreren Hunden antreten?

denn dann wäre eine Tabelle mit Teilnehmernummer und Hundedaten erforderlich.

Dann hast Du Disziplin1, Disziplin2, Disziplin3 ? aber mit den gleichen Auswahlkriterien.
Ich gehe davon aus das ein Teilnehmer an einem Tuniertag anscheinend bei 3 Disziplinen teilnehmen kann, oder liege ich da falsch?

Dies würde ich aber so lösen das es eine Tabelle gibt wo die Teilnehmernummer eingegeben wird, die Daten ggf. über Sverweis in die Tabelle geschrieben werden. (Name, Vorname, Hund) wobei da wieder mal die Frage auftaucht können pro Teilnehmer mehrere Hunde sein….. Es aber nur eine Spalte mit Disziplin gibt und in dieser Tabelle auch die Punkte eingetragen werden.

Nur wie sieht es jetzt mit Impfung und bezahlt aus….
Impfung könnte bei den Teilnehmerdaten hinterlegt sein wenn nur ein Hund pro Teilnehmer, sonst müsste das in die Hundetabelle.
Bezahlt könnte in die Tabelle hinterlegt werden wo auch die Punkte eingetragen werden, falls pro Disziplin zu bezahlen ist.

Wenn das gegeben ist und Daten vorliegen, dann können diese auch ausgewertet werden.

Aber um jetzt konkret zu sagen wie Du das lösen solltest, müsste mir der komplette Ablauf klar sein.
In der EDV würde ich sagen ich brauche einen gültigen Algorithmus. *Smilie