CommandButton 4 Klicks,4 verschiedene Makros

Computer: Software & Programmierung Visual Basic
#21

Ich hab mich vermutlich unklar ausgedrückt:
lauf muss 10,30,50 sein und dann wieder auf 10 springen, also:

lauf = IIf(lauf > 50, 10, lauf + 20)

Dann sollte auch der leere Durchlauf weg sein.

Hallo Andreas,

den leeren Durchlauf müßte Frank nochma erläutern.
Oder geht es nicht um vier Klicks 10,30,50,70 sondern nur um drei 10,30,50

Egal welches man davon nimmt:
lauf = IIf(lauf > 69, 10, lauf + 20)
lauf = IIf(lauf > 50, 10, lauf + 20)
lauf durchwandert die vierWerte 10,30,50,70
und fängt dann wieder bei 10 an.

@Frank, ist denn die 10 in dieser Zeile okay:
Siegerehrung.Caption = Sheets(1).Cells(10, 120)
Da soll kein „lauf“ hin?

Gruß
Reinhard

#22

Hallo Andreas,

Hallo Reinhard,

den leeren Durchlauf müßte Frank nochma erläutern.
Oder geht es nicht um vier Klicks 10,30,50,70 sondern nur um
drei 10,30,50

Ja, es gibt 3 Siegerehrungen, für Solo, Pärchen und Tisch

Egal welches man davon nimmt:
lauf = IIf(lauf > 69, 10, lauf + 20)
lauf = IIf(lauf > 50, 10, lauf + 20)
lauf durchwandert die vierWerte 10,30,50,70
und fängt dann wieder bei 10 an.

Es soll aber 10,30,50,10,30,50 … sein.
Also würde er mit lauf > 69 4x laufen, mit lauf > 50 aber nur 3.

@Frank, ist denn die 10 in dieser Zeile okay:
Siegerehrung.Caption = Sheets(1).Cells(10, 120)
Da soll kein „lauf“ hin?

ich hab das so verstanden: In cells(10, 120) ist die Überschrift „Siegerehrung“. Die ist für alle 3 Durchläufe gleich.
Ja, Frank könnte dann die „Siegerehrung“ auch fest in der Userform „verdrahten“ und den lauf dann auch bei 14 beginnen lasse.

@Frank: Bitte schicke doch Reinhard mal deine neueste Version der Mappe. Dann wird es klarer.

Gruß
Reinhard

Gruß, Andreas

#23

Hallo Andreas,

Oder geht es nicht um vier Klicks 10,30,50,70 sondern nur um
drei 10,30,50

Ja, es gibt 3 Siegerehrungen, für Solo, Pärchen und Tisch

axo, thx.

Egal welches man davon nimmt:
lauf = IIf(lauf > 69, 10, lauf + 20)
lauf = IIf(lauf > 50, 10, lauf + 20)
lauf durchwandert die vierWerte 10,30,50,70
und fängt dann wieder bei 10 an.

Es soll aber 10,30,50,10,30,50 … sein.
Also würde er mit lauf > 69 4x laufen, mit lauf > 50 aber nur
3.

Nö, für dreimal müßte das so oder ähnlich sein:
lauf = IIf(lauf = 50, 10, lauf + 20)

@Frank, ist denn die 10 in dieser Zeile okay:
Siegerehrung.Caption = Sheets(1).Cells(10, 120)
Da soll kein „lauf“ hin?

ich hab das so verstanden: In cells(10, 120) ist die
Überschrift „Siegerehrung“. Die ist für alle 3 Durchläufe
gleich.

Ok.

Gruß
Reinhard

#24

Nö, für dreimal müßte das so oder ähnlich sein:
lauf = IIf(lauf = 50, 10, lauf + 20)

Sorry, you’re right. @Frank. Bitte ändern.

Gruß
Reinhard

Gruß, Andreas

#25

Hallo Reinhard hallo Andreas,

jaaaa mit =50 funktioniert das prima.

Herzlichen Dank euch beiden :smile:

Glg Frank