VBA Zählen von gezogenen Zahlen

Forumthread: VBA Zählen von gezogenen Zahlen
2 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: VBA Zählen von gezogenen Zahlen

gezogenen

Hallo Spezialisten,
habe heute auch mal wieder ne Frage.
Ich ziehe Lottozahlen und möchte die gezogenen Zahlen (also wie oft)
erfassen.
Geht das ? und
kann mir jemand den Code hierzu einbauen?
meine Lösung war doch recht lang...


if zahl = 1 then cells(..).Value = Cells(..).Value +1
if zahl = 2 then cells...
bis
if zahl = 49 then cells..

Meine Mappe:
https://www.herber.de/bbs/user/80944.xls
besten Dank im voraus
Heribert

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

AW: VBA Zählen von gezogenen Zahlen

gezogenen
AW: VBA Zählen von gezogenen Zahlen

gezogenen

AW: VBA Zählen von gezogenen Zahlen

12.07.2012 15:19:52

gezogenen

Hi Heribert

Private Sub CommandButton1_Click()
Call ziehung
Call auswerten
End Sub

Sub auswerten()
Dim i As Byte
With Worksheets("Lotto")
For i = 1 To 7
.Cells(.Cells(i + 1, 1) + 2, 4) = .Cells(.Cells(i + 1, 1) + 2, 4) + 1
Next i
End With
End Sub
cu
Chris

AW: VBA Zählen von gezogenen Zahlen

12.07.2012 15:25:55

gezogenen

Hi Chris,
perfekt, danke
Heribert