2 Antworten in diesem Thema

[Paroli]

Es gibt bereits sehr hilfreiche Themen bezüglich Excel-Programmierung in diesem Forum. Ergänzend dazu werde ich in diesem Thema einige weitere Tipps und eigene Erfahrungen veröffentlichen.

1. Excel Beschaffung

Wer kein MS Office auf seinem Rechner hat, kann sich für den Einstieg eine günstige gebrauchte Lizenz einer älteren Version besorgen. Bei eBay.de kann man z.B. Excel 5 günstig bekommen (ab 20 Euro). Für den normalen Gebrauch ist diese Version völlig ausreichend und sie läuft auch noch auf uralten PC's. Großer Vorteil gegenüber allen nachfolgenden Versionen: VBA deutschsprachig. Man kann z.B. Permanenz-Durchläufe usw. mit dem Makro-Recorder aufzeichnen und den Code ohne viel Lernaufwand ändern oder erweitern.

Zweite Möglichkeit: OpenOffice.org 1.0 und die neue Beta-Version 1.1 kann man kostenlos im Internet herunter laden. In dieser Programmsammlung ist auch die Tabellenkalkulation OpenOffice.org Calc enthalten, die Excel sehr ähnlich ist. Alle Tipps für Excel, z.B. wie man Favoriten berechnet, sind auch mit OpenOffice.org Calc nachvollziehbar.

[Paroli]

2. Erste Erfolgserlebnisse mit eigenen Versuchen

Zu Beginn sollte man zunächst mit kurzen Formeln herum probieren. Lange Formeln erscheinen anfangs abschreckend. Deshalb eignet sich das Einfache Chancen-Paar Passe/Manque zunächst besser für Berechungen, als Schwarz/Rot oder Pair/Impair.

Beispiel:



In Spalte B ab Zeile 5 untereinander die Zahlen 1, 36, 2, 35, 3, 34 usw. eingeben (also die Roulettezahlen abwechselnd vorwärts und rückwärts weiter gezählt).

In Zelle C5 die in blauer Schrift dargestellte Formel eingeben und anschließend die Zelle C5 abwärts kopieren: Jeweils mit Tastenkombination "Ctrl" + "C" kopieren und mit Tastenkombination "Ctrl" + "V" in Zelle C6, C7, C8, C9 usw. einfügen. Oder die Zelle C5 anklicken und über Menüpunkt "Bearbeiten" / "Kopieren" den Inhalt auswählen und diesen dann mittels "Bearbeiten" / "Einfügen" bei C6, C7, C8, C9 usw. (jeweils anklicken) einfügen.

Genau so wird mit der zweiten Formel verfahren, die zunächst in Zelle D6 (siehe Beispiel) eingegeben wird. Nach erfolgreicher Eingabe wird die Formel auch in die Zelle D5 kopiert und anschließend in die Zellen D7, D8, D9 usw.

Das Kopieren von Formeln in andere Zellen lässt sich vereinfachen oder über Programm steuern, aber das sollte für den Anfang zunächst egal sein.

Wenn alle drei Spalten B, C und D jeweils über 36 Zeilen ausgefüllt sind (Permanenz wie beschrieben, Formeln richtig kopiert), sollte sich bei der aufgeschlüsselten Permanenz eine Intermittenz zwischen Passe und Manque ohne Serien dazwischen ergeben haben.
Wenn das geklappt hat, sollte man das Arbeitsblatt speichern. Anschließend kann man die Zahlen in der Perm-Spalte B löschen und durch Zahlen aus eigenen Aufzeichnungen oder realen Permanenzen ersetzen.

[Paroli]

Nächstes Beispiel am besten auf einem neuen Excel-Arbeitsblatt


Das gleiche Beispiel für Pair/Impair. Häufig kommt man zuerst auf die Idee, die Formeln für die Aufschlüsselung von Pair oder Impair ähnlich lang wie für Rot oder Schwarz zu schreiben (also z.B.
=WENN(ODER(B5=2;B5=4;B5=6;B5=8;B5=10;B5=12;B5=14;B5=16;B5=18;B5;B5=20;
B5=22;B5=24;B5=26;B5=28;B5=30;B5=32;B5=34;B36);"X";"")

Es geht auch kürzer, wie das nachfolgende Beispiel zeigt. Das gemeinsame Merkmal gerade oder ungerade lässt sich über den Restbetrag bei Teilung durch 2 in Kurzform bringen.



Zum Üben sollte man in Spalte B die Zahlen 1 bis 36 abwärts eintragen (ab Zelle B5) und die Formeln, wie im Beispiel dargestellt eingeben und in die übrigen Zellen der gleichen Spalte kopieren (Formel von Zelle C5 nach C6 und weiter bis C40 kopieren, Formel von Zelle D6 nach D5 und von D7 bis D40 kopieren).


Um Fehler zu vermeiden muss die Formel zur Pair-Ermittlung später noch erweitert werden, sonst wird bei leeren Zellen oder bei Zellen mit Inhalt 0 trotzdem das X ausgegeben. Deshalb wird die ergänzende "0"-Abfrage eingefügt:
=WENN(C5=0;"";WENN(REST(C5/2;1)=0;"X";""))
Da es sich jetzt um zwei Abfragen handelt, muss die Formel mit zwei schließenden Klammern beendet werden.
Will man auch noch andere Zeichen (z.B. Handwechsel-Striche) ausschließen verlängert sich die Formel nochmals:
=WENN(NICHT(ISTZAHL(C5));"";WENN(C5=0;"";WENN(REST(C5/2;1)=0;"X";"")))
oder in anderer Form:
=WENN(ODER(NICHT(ISTZAHL(C5));C5=0);"";WENN(REST(C5/2;1)=0;"X";""))

Zum anfänglichen Üben reicht aber zunächst die Formel aus der Beispielgrafik.




@DC:
Jetzt nimmt das langsam Hand und Fuß an...