Mein Tipp fürs kommende WE:




Wer mitspielen will, meldet sich. Abrechnung nach dem WE über mich direkt!!

Anmerkung:

Dieser Tipp wurde aus Vollsystem mit 5184 Reihen gespielt.
Nach dem Zufallsprinzip wurden 48 Reihen ausgesucht und gespielt!! Es gibt keine Garantie. Wir brauchen also mehr als Glück, wir brauchen Glück, Glück und nochmals Glück!!

Gesamtpreis 25,-- Euro - 10 Anteile zu je 2,50

Annahmeschluß, Samstag 9.00 Uhr

1 Anteil
Norbert

2 Anteile
wettjunkie
ZiggyX

5 Anteile
ochjoo


AUSVERKAUFT


Gruß ochjoo

:tor:

Hallo,

nach längerer (Google-)Recherche habe ich für mein Problem noch keine Lösung gefunden. Jetzt habe ich mit meinen bescheidenen VBA-Kenntnissen einen Code entwickelt, der meine erwarteten Ergebnisse bringt.
ABER: die Formel muss ich für sehr viele Zeilen erweitern, weswegen ich eine Optimierung benötige, aber alle meine Versuche sind gescheitert.



(Zeile 1 = "RangeA"; Zeile 2 ist 1, 2, 3, 4, ...)

Es geht darum, dass die Werte von Range A mit den Werten mit Range B wie folgt verglichen werden:
Zeile 2 mit Zeile 2
Zeile 2 mit Zeile 3
Zeile 2 mit Zeile 4
usw....
--> das Ergebnis kommt in Spalte V ab Zeile 2

dann
Zeile 3 mit Zeile 2
Zeile 3 mit Zeile 3
Zeile 3 mit Zeile 4
usw....
--> das Ergebnis kommt in Spalte W ab Zeile 2

Dafür habe ich diesen Code:



und hier zum kopieren:

Sub zählen1()
'Zählen Zeile 2 aus Range A mit Zeilen aus Range B
Worksheets(4).Cells(2, 22) = Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("O2")) _
+ _
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("P2")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("Q2")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("R2")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("S2")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("T2"))

Worksheets(4).Cells(3, 22) = Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("O3")) _
+ _
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("P3")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("Q3")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("R3")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("S3")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("T3"))

Worksheets(4).Cells(4, 22) = Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("O4")) _
+ _
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("P4")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("Q4")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("R4")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("S4")) + _
_
Application.WorksheetFunction.CountIf(Range("A2:L2"), Range("T4"))

'Zählen Zeile 3 aus Range A mit Zeilen aus Range B
Worksheets(4).Cells(2, 23) = Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("O2")) _
+ _
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("P2")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("Q2")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("R2")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("S2")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("T2"))

Worksheets(4).Cells(3, 23) = Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("O3")) _
+ _
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("P3")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("Q3")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("R3")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("S3")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("T3"))

Worksheets(4).Cells(4, 23) = Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("O4")) _
+ _
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("P4")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("Q4")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("R4")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("S4")) + _
_
Application.WorksheetFunction.CountIf(Range("A3:L3"), Range("T2"))
End Sub

Und diesen müsste ich jetzt für die vielen Zeilen nach unten fortschreiben; aber da gibts bestimmt eine andere, bessere Lösung.

Der Einfachheit halber, habe ich Range A und Range B in der gleichen Tabelle; in der Endfassung ist dann Range B in einer anderen Tabelle wie Range A. Aber das müsste dann anpassbar sein.

Besten Dank für eine Hilfe. Nachdem ich hier diesen eigenen Bereich entdeckt habe, finde ich hier ja vielleicht einen Experten

Hey !

Wollte mich hier mal erkundigen wo ich denn am besten Sportwetten betreiben kann ?

Habe bis jetzt immer gezögert aber ich denke dass man es doch mal versuchen kann. Ich meine viele meiner Freunde spielen das auch und gewinnen dann ab und zu mal auch ganz gut Da ich aber auch ein seriöses spielen will, möchte ich euch mal fragen wo ich das machen kann ? Wo wettet ihr denn ? Uns würdet ihr mir das empfehlen können ? Wenn ja dann freue ich mich sehr.

Vielen Dank

Moinsen

Unser Spiel wieder für kommenden Samstag, alles wie gehabt!!

Letzter Kontostand = 31,50 Euro Minus - pro Anteil 3,15€
-------------------------------------------------------------------------------

2 Anteile
Tom

4 Anteile
Hujuk
ochjoo


AUSVERKAUFT

Gruß ochjoo

http://www.gmx.net/magazine/panorama/zdf...n-30223036
:guck:
Aktualisiert am 19. November 2014, 20:23 Uhr
Mainz/Saarbrücken (dpa) - Bei der Ausstrahlung der Lottozahlen im ZDF hat es am Mittwochabend eine Panne gegeben. Es sei der falsche Beitrag mit den Zahlen der vergangenen Woche auf den Sender gegangen, bestätigte ein Sprecher des Mainzer Senders der Deutschen Presse-Agentur. Der Sendeleiter habe den Fehler bemerkt und nach etwa der Hälfte, nach 27 Sekunden, die Ausstrahlung beendet.

"Es hat offenbar ein technisches Problem gegeben. Darum wurde nicht die Grafik mit den heutigen Zahlen, sondern denen der Vorwoche gezeigt", sagte ZDF-Sprecher Alexander Stock. "Der Zuschauer hat also bemerkt, dass etwas nicht in Ordnung war."

Nach dem Abbruch des Beitrags habe das ZDF einen Programmhinweis ausgestrahlt. In der anschließenden "Heute"-Sendung seien dann die richtigen Zahlen verbreitet worden, sagte Stock. Man bedauere den Fehler. Die Zahlen lauten: 4 - 5 - 18 - 26 - 34 - 48 und Superzahl 0.

Letzte größere Panne war im April 2013

Saartoto sah die Panne gelassen. "Ein Glück, dass der Fehler gleich bemerkt wurde", sagte Sprecher Thomas Schäfer in einer ersten Reaktion. Die Ziehung der Lotto-Zahlen wird seit Sommer vergangenen Jahres nur noch per Internet live übertragen, im Fernsehen wird sie nur noch später als Aufzeichnung gesendet.

Die Glückskugeln rollen mittwochs und samstags stets in einem Studio des Saarländischen Rundfunks in Saarbrücken. Saartoto hat derzeit auch die Federführung im Deutschen Lotto- und Totoblock.

Bei der Ziehung selbst hatte es vor rund eineinhalb Jahren einen größeren Fehler gegeben: Bei der bisher wohl größten Panne waren beim Mittwochslotto am 3. April 2013 nicht alle Kugeln in die Trommel gerollt, zwei hingen fest. Daraufhin wurden die Zahlen für ungültig erklärt und die Ziehung wiederholt. © dpa :guck:

Auf zur neuen Runde!!!




Info: Die Mail an den Lesezirkel ist raus!! Das muss ja was werden diese Woche!!

Moinsen

Gleiches Spiel, wie am 15.11.2014

Letzter Kontostand: 22,80 Euro Minus

1 Anteil = 2,28 Euro Minus

------------------------------------------------------------------------------

2 Anteile
Tom

4 Anteile
Hujuk
ochjoo


AUSVERKAUFT


Danke und Gruß

ochjoo

heute versuche ich mich mit Kombiwetten

1x 3er Kombi
1x 4er
1x 5er
1x 6er
1x 7er
1x 8er
1x 9er

Einsatz jeweils 50 Cent
Verteilung unterschiedlich, möglichst bei der jeweils anderen Kombi ein anderes Ergebnis als zuvor bei einer geringeren Kombi
Auswahl erfolgt später

Tableau: EM-Quali

Auf welche Seite kann ich mir alle bevorsteheneden Lotto Sonderauslosungen anschauen ?

Ich hatte mal eine gute Seite die ich leider nciht merh finde
Am Mi 19.11.2014 steht eine Bundesweite sonderauslosung bei der Glücksspirale an, kann des sein ?

Hallo,

ich bin auf der Suche (oder möchte mit EXCEL erstellen) nach 150 Systemreihen - eine Reihe besteht aus 12 Zahlen. Dabei sollen folgende Bedingungen erfüllt werden:
- 35 Zahlen stehen zur Auswahl
- die Zahlen sollen in den Reihen möglichst gleich verteilt sein

Nach Möglichkeit sollen die Zahlen dann auf 36 oder 37 oder 38 oder 39 oder 40 erweitert werden (ggfls. dann auch mehr Reihen).

Kann jemand ausrechnen, wieviel Systemreihen mit je 12 Zahlen ich benötige, wenn aus den 35 Wahlzahlen zumindest drei Richtige in einer Systemreihe vorkommen sollen?

DANKE!