Faustan

Er merkt's aber auch nicht. Das sind 3 Einsätze, Geld futsch.

Löscht €roulette€ dann nochmal seinen Eröffnungspost, bitte? Es ist eine Falschmeldung, Kettenbrief der nicht real ist. Aber die personenbezogenen Daten darin sind real. Also bitte löschen, €roulette€.

Hmm blöder Browser. Das lag nämlich nicht auf roulette-forum.de sondern bei mir aufm Server. So, jetzt nochmal als Anhang hier. Sind 1000 Zeilen fertig vorbereitet. EDIT: Anhang entfernt. Ist nämlich nicht mein ExcelBlatt, sondern Heiß75 seins.

Oha, ich merke aber gerade die Lösung ist saulangsam mit mehreren tausend Zahlen. Sorry. Da muss man sich noch was anderes zusammenbasteln.

Okay, hab's. Hmm, bei mir gings. Bei dir im Blatt kommen Fehlermeldungen. So, ganz rudimentär gelöst. Mit bedingter Formatierung: =istfehler(A1) dann weisse Schrift

Erm €Roulette€, Webseite gelesen? Der Brief kursiert seit 2000 im Netz.

Viel Spass die 20 Minuten. Was machst danach noch, Disse?

Hmmm, ich würde das Blatt 'EC-Serie' löschen, und alles im Blatt 'EC Serie' berechnen. Im Blatt 'EC Serie': 1. Verschiebe Spalten B-I nach hinten zu K. 2. In A1 kommt dann: =WENN(ZEILE(K1)>ANZAHL2(K:K);"";INDEX(K:K;KKLEINSTE(WENN(K$1:K$1000<>"";ZEILE($1:$1000));ZEILE(K1)))) Diese Formel nicht mit Enter-Taste abschliessen, sondern mit Strg+Umschalt+Enter. Es handelt sich nämlich um eine Matrixformel. 3. Spalte A1 markieren und den Inhalt rüberziehen bis Spalte H1. 4. A1 bis H1 markieren und runterziehen.

Du hast warscheinlich im Code jetzt bei jedem Button: Sheets(1).Cells(n, 1).Select oder? Das ist falsch. Deshalb wechselt er immer wieder zu Tabelle1. Lass es einfach so: Cells(n, 1).Select Dann bleibt Excel im aktuellen Blatt und markiert dort nur die Zelle (um zu scrollen). EDIT: Ausserdem darauf achten dass die UserForm nicht modal angezeigt wird. 'Modal' heisst alles wird gestoppt solange die UserForm aktiv ist, du kannst also nicht ins ExcelBlatt wechseln während die UserForm läuft.

Hmmm, versteh' dich nicht. Alles oder ??

@msoprofi Ich seh' grad, hast du da nicht nen Fehler drin? For Row = 3 To 65535 If Cells(1, Row) = "" Then LastRow = Row - 1: Exit For Next Du liest dann von Spalte 3 bis Spalte 65535. Und dort jeweils nur Zeile 1. ?

Neee Range("Tabelle1A2:A100").ClearContents ist ja falsch. Mag VBA nicht. Du musst Sheets(). nehmen. Die Zahl in Klammern sagt dann welches Blatt. Also: Sheets(1).Range("A2:A100").ClearContents sollte funktionieren. Und bei den Buttons: Dim n As Long For n = 2 To Cells(65356, 1).End(xlDown).Row If Sheets(1).Cells(n, 1).Value = "" Then Sheets(1).Cells(n, 1).Value = 0 Exit For End If Next n

Hmm? meine Lösung ist langsam, und Private Sub CommandButton39_Click() = P Range("A2:A100").ClearContents ist schneller? Okay. Aber denk dran das Range() den Content im aktuellen Blatt löscht. Da müsstest noch Sheets(1). davor schreiben *glaub ich*.

Okay, verändere für jeden Button einfach den Code in: Sheets(1).Cells(n, 1).Value = "" Also bei Cells... nur Sheets(1). davor schreiben. Somit wird nur in das erste Blatt (Sheet) geschrieben. Ebenso beim Löschen-Button. Ansonsten löscht er nämlich im aktuellen Blatt. Wollen wir ja nicht. Sollte dann alles so klappen, oder?

Moin, ah okay. Nach viermal lesen hab' ich's verstanden Du möchtest dass das 2te 3te oder 4te Blatt geöffnet bleibt wenn du in die UserForm klickst. Muss man mal schauen, im Code muss man dann noch eingeben das nur in Tabelle1 die Zellen genutzt werden. Sooo fit in Excel Vba bin ich auch nicht, also kann 'nen Moment dauern bis ich mir das ergoogelt habe Bis 'schpeter'.

Sollte klappen mit Cells(n, 1).Select also einfach in eine neue Zeile unter "Cells(n, 1).Value = 0" bei jedem Button schreiben.

Die letzte Eingabe löschen: Dim n As Long For n = 3 To Cells(65356, 1).End(xlDown).Row If Cells(n, 1).Value = "" Then Cells(n - 1, 1).Value = "" Exit For End If Next n Wichtig Variable n ist diesmal 3, damit nicht das Wort 'Permanenz' aus A1 gelöscht wird. Gesamte Permanenz löschen: Dim n As Long Dim n As Long For n = 2 To Cells(65356, 1).End(xlDown).Row If Cells(n, 1).Value = "" Then Exit For Else Cells(n, 1).Value = "" End If Next n

Moin, also wenn ich das so richtig verstanden habe sucht @Rythm eine weibliche Begleitung um mit ihr zusammen seinen 7000Eur Kredit auf den Kopf zu hauen? Okay, und dann? 7000Eur Schulden, einmal Las Vegas gesehen und die weibl. Begleitung verabschiedet sich wieder. Lass mal die Männers von der Webseite Wind vom Geld bekommen, da tanzt Erstens so oder so kein Fräulein an, und Zweites kannste mit deinen 7000Eur noch böse auf die Schnauze fallen, dafür fliegen die gerne mit deinen gesponsorten Tickets einmal hier rüber. Wie kannst du ausserdem allen ernstes in Erwägung ziehen solche Webseiten ernst zu nehmen. Oder war's gar noch eine Spammmail die du für voll nimmst? Aber gut, woanders haste ja schon geschrieben das de 'nen Engel an deiner Seite hast der dir beim Roulette hilft, oder dir 'nen Auftrag gab oder so ... lass dir mal was verschreiben dagegen. Scheinbar schwebst du irgendwo ganz woanders. Sry, aber ich kann mit sowas absolut gornix anfangen.

Moin, da muss noch für jeden Button eine For-Schleife rein mit der du in Spalte A die erste leere Zelle findest und dann ausfüllst. Etwa sowas: Dim n As Long For n = 2 To Cells(65356, 1).End(xlDown).Row If Cells(n, 1).Value = "" Then Cells(n, 1).Value = 0 Exit For End If Next n Die Value halt für jeden Button anpassen, 0-36.

Moin, Smileys nicht gesehen? Der Beitrag war nämlich nicht staubtrocken gemeint Der erste Punkt wo du mir widersprichst bezog sich darauf das man (gefühlt) häufig in die Situation kommt wo ein Treffer immer unmittelbar nach dem letzten Satz kommt. Genauso häufig kommt es ja auch vor das die Kugel ein Fach daneben landet, oder man gerade die 14 spielt und es fällt die 15. Bei Progressionen tut das halt extra weh, wenn man 'ne schöne Stange Geld versemmelt und dann zum Abschied noch ein 'Auf Wiedersehen' vom Tisch bekommt indem er gerade dann die Zahl schmeisst. Und naklör hat's mit dem Kapital des Spielers zu tun. Die Situtation entsteht doch nur wenn's Geld alle ist. Zuwenig Kapital für sein eigenes Spiel, das ist wohl der Fehler den die Meisten am Anfang machen. So, wat ham wa noch in deinem Post. Das 'Gegen sich selbst Wetten'. Kennste vielleicht nicht, aber manchmal sagt dir der Bauch was anderes als dein Spielplan. Und (gefühlt) öfters kommt es dann auch so. Man schaut auf die Permanenz und denkt sich 'na das wird bestimmt dasunddas' und was kommt, richtig. Und zum Abschluss, das mit dem Pausieren. Eben weil man sich ärgert das am Ende des Geldes garantiert der nächste Coup ein Treffer wäre setzt man halt diese Runde jetzt mal nicht. Man könnte genauso gut nach den ersten verlorenen Progi-Stufen davon ausgehen das man einen schlechten Lauf hat, und spielt morgen erstmal wieder klein an und wenn man ein gutes gefühl für die Situation hat, spielt man seinen Paukenschlag-Satz von gestern. Ist alles bloßes Bauchgefühl, Annahme, Wunschdenken. Nix Anderes. Keine Spieltipps. So, wieder genug geschwurbelt. Ick werd die nächsten Tage mal wieder nur zuschauen.

Das passiert Progressionsspielern ständig. Als ob's Roulette genau weiss wann dein Geld alle ist. Mittlerweile wette ich sogar schon gegen mich, a la "kommt jetzt eh nicht", und setze das Gegenteil von dem worauf ich setzen wollte. Ein zwei Runden pausieren kann auch hilfreich sein, und ausserdem muss man eine Progi nicht am Stück spielen.

Moin, viele von euch kennen sicherlich den Windows-Spieleklassiker 'MineSweeper'. Sinn des Spieles ist es Felder aufzudecken und dabei den Minen auszuweichen. Zahlen geben dabei Hinweise wo man gefahrlos klicken kann. (Ich hab's nie wirklich gespielt, Beschreibung daher nur ausm Gedächtnis heraus.) Ich habe mir überlegt daß man dieses Schema, zumind. die Darstellungsart, auf's Roulette übertragen kann. Man nimmt sich 37 Zeilen untereinander in die man die Anzahl des Erscheinens jeder Zahl einträgt. Nach einer festen Anzahl Coups, bei mir sind's 30, schaut man in seine Liste und wettet auf die erschienenen Zahlen. Natürlich gibt es beim Roulette keine Garantie das diese Zahlen nochmals erscheinen; anders beim MineSweeper Spiel, wo ja jede Zahl den Weg Richtung Mine weist. Allerdings müssen Favoriten auf ihrem Weg zum Favorit-Sein ja häufiger erscheinen als andere Zahlen. Wetten wir also auf erschienene Zahlen, wetten wir autom. auf Favoriten die erst noch im Entstehen sind. Nachfolgend ein Auszug aus meinem Excelblatt. Ganz Links trage ich zunächst einen Vorlauf ein, nun sieht man rechts im Schema welche Zahlen wie oft erschienen sind. Auf was man nun wettet bleibt jedem selbst überlassen , nur soviel: Ich habe auf dieser Permanenzstrecke +529 Stk. erzielt. Natürlich mit Progression, aber auch im Gleichsatz käme diese Strecke auf +150 Stk..** Hat man seine Zahlen ermittelt geht es links in einer neuen Spalte weiter, man trägt untereinander die Coups ein. Man sieht dann rechts ob man getroffen hat und ermittelt seine neue Zahlen die man setzen will. Wäre für euch noch etwas Handarbeit, die Rechnerei der Sätze. Ich hab's vollständig im Excelblatt integriert, will's euch aber nicht einfach vor die Nase setzen ** EDIT: Die +150 im Gleichsatz sind pures Glück. Es wurde jeden Coup sturr durchgespielt, aber wer macht das schon. Man sollte auf jedenfall nach zwei, drei Treffern pro Rotation aufhören zu setzen und die Rotation zuende notieren. Mein Progressionsspiel endete immer nach drei, vier Treffern, je nach Gefühl und danach wurde die Rotation zuende angeschaut.

Für den riesigen PopUp-Werbebanner mit der Kuh gibts Geld.

Die sich dann wundern das der Croupier ihr Stück nicht annimmt wenn sie "Kleine Serie" annoncieren. Du solltest schon die richtigen Begriffe verwenden, in Beschreibung und Programm.

Moin @ruckzuckzock, da haste aber 'n bissl gecheatet, bzw. einen deiner älteren Posts kopiert. Den hab' ich ja vor Monaten schon gelesen von dir. Ich seh's genauso. RI und SP sind die beiden Kandidaten. Und nach 'ner Rotation kommt meist -nicht immer- mehr RI als RP & mehr SP als SI. Lukasz' Sig2 zählt das einfach aus. In der Annahme das sich P/I ausgleichen (innert 50 Farbwechsel). Ich selbst hab' 'n bissl mit RI und RIM/RIP rumgespielt. Wie ich ein paar Posts vorher schon erwähnte, manchmal läuft es wie am Schnürchen mit dem 'Farbe vorhersagen'. Und dann nach 'n paar Coups mehr fällt die Kinnlade wieder runter weil man im Moment garnix mehr trifft. Wie bei jedem System halt. Klar hat es Charme, aber es gewinnt eben nicht jede Partie. Das einzige was ich cool fand man konnte die Serienlänge beschränken. Ist dann wohl was für die Progressierer. @charly Nicht R/S und P/I einzeln betrachten. Nehm' sie als Paare. Bleistift* RI, wenn RI +2, wenn RP o. SI +0, wenn SP -2. Das Schöne daran, du kannst 16 Zahlen komplett vergessen. Deine Permanenz zeigt nunmehr nur noch RI, SP und Zero. Soo, wahrscheinlich nix davon war jetzt Lukasz bezogen. Macht mir aber nix. *Bleistift: Verballhornung des Wortes "Beispiel".