Ich will Sporttabellen berechnen lassen.
Genau soll es so aussehen, dass ich die Ergebnisse eingebe und sich die Tabelle automatisch immer aktualisiert und sortiert (das Team mit den meisten Punkten als erster usw.)
Wie krieg ich das hin?
Olfi
Ich will Sporttabellen berechnen lassen.
Genau soll es so aussehen, dass ich die Ergebnisse eingebe und sich die Tabelle automatisch immer aktualisiert und sortiert (das Team mit den meisten Punkten als erster usw.)
Wie krieg ich das hin?
Olfi
nachfolgende Tabelle wurde automatisch sortiert,
nachdem die Tabelle1 aktiviert wurde.
Zuerst wird nach Punkten, dann nach der Tordifferenz
und zum Schluß (bei Pkt.- und Tordiff.-Gleichheit)
nach den geschossenen Toren sortiert.
Deine Spalten sind noch anzupassen.
Die Formeln für die Errechnung der Tor-/Punktdifferenz
mußt Du natürlich noch ergänzen.
Als Lösungsansatz kannst Du mal bei www.pcwelt.de
vorbeigucken. (Suchbegriff: WM-Wette).
Dort siehst Du, wie eine Wenn-Formel aufgebaut wurde.
Private Sub Worksheet_Activate()
'Code steht in Tabelle1
Range("B2:F5").Select
Selection.Sort _
Key1:=Range("F2"), Order1:=xlDescending, _
Key2:=Range("E2"), Order2:=xlDescending, _
Key3:=Range("C2"), Order3:=xlDescending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub
Ciao MikeS