Makroproblem
Betrifft: Makroproblem
von: ReSt
Geschrieben am: 12.10.2014 16:45:49
Hallo
Ich möchte meinen Lottogenerator ausbauen und auf 14 Tippe erweitern.
Mein altes Makro funktioniert leider nicht.
Es rechnet nur bis Zeile 8 statt wie im Makro Zeile 15.
Aktiviere ich das Makro, hängt es sich auf.
Wo liegt der Fehler ?
https://www.herber.de/bbs/user/93124.xlsm
Gruss Reto
Tabelle1
| | A | B | C | D | E | F | G | H | I | J | K | L | M | N | O | P |
| 1 | Lotto | | | | | | | | | | | | | | Glückszahl | |
| 2 | 1 | 2 | 3 | 4 | 5 | 6 | 1 Tipp | 1 | 2 | 3 | 4 | 5 | 6 | | 4 | |
| 3 | 1 | 2 | 11 | 4 | 5 | 6 | 2 Tipp | 1 | 2 | 4 | 5 | 6 | 11 | | 3 | |
| 4 | 1 | 2 | 3 | 32 | 5 | 6 | 3 Tipp | 1 | 2 | 3 | 5 | 6 | 32 | | 3 | |
| 5 | 1 | 2 | 3 | 44 | 5 | 6 | 4 Tipp | 1 | 2 | 3 | 5 | 6 | 44 | | 2 | |
| 6 | 65 | 2 | 3 | 4 | 5 | 6 | 5 Tipp | 2 | 3 | 4 | 5 | 6 | 65 | | 1 | |
| 7 | 1 | 2 | 3 | 7 | 5 | 6 | 6 Tipp | 1 | 2 | 3 | 5 | 6 | 7 | | 6 | |
| 8 | 33 | 23 | 3 | 4 | 5 | 6 | 7 Tipp | 3 | 4 | 5 | 6 | 23 | 33 | | 4 | |
| 9 | 1 | 2 | 3 | 4 | 5 | 6 | 8 Tipp | 1 | 2 | 3 | 4 | 5 | 6 | | 4 | |
| 10 | 1 | 2 | 23 | 4 | 5 | 6 | 9 Tipp | 1 | 2 | 4 | 5 | 6 | 23 | | 4 | |
| 11 | 1 | 2 | 3 | 4 | 5 | 6 | 10 Tipp | 1 | 2 | 3 | 4 | 5 | 6 | | 1 | |
| 12 | 1 | 2 | 23 | 4 | 5 | 6 | 11 Tipp | 1 | 2 | 4 | 5 | 6 | 23 | | 4 | |
| 13 | 1 | 2 | 3 | 4 | 45 | 6 | 12 Tipp | 1 | 2 | 3 | 4 | 6 | 45 | | 4 | |
| 14 | 1 | 2 | 3 | 4 | 5 | 6 | 13 Tipp | 1 | 2 | 3 | 4 | 5 | 6 | | 1 | |
| 15 | 1 | 2 | 3 | 4 | 5 | 6 | 14 Tipp | 1 | 2 | 3 | 4 | 5 | 6 | | 3 | |
| verwendete Formeln |
| Zelle | Formel | Bereich |
| H2 | =KKLEINSTE(A2:F2;1) | |
| I2 | =KKLEINSTE(A2:F2;2) | |
| J2 | =KKLEINSTE(A2:F2;3) | |
| K2 | =KKLEINSTE(A2:F2;4) | |
| L2 | =KKLEINSTE(A2:F2;5) | |
| M2 | =KKLEINSTE(A2:F2;6) | |
| O2 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H3 | =KKLEINSTE(A3:F3;1) | |
| I3 | =KKLEINSTE(A3:F3;2) | |
| J3 | =KKLEINSTE(A3:F3;3) | |
| K3 | =KKLEINSTE(A3:F3;4) | |
| L3 | =KKLEINSTE(A3:F3;5) | |
| M3 | =KKLEINSTE(A3:F3;6) | |
| O3 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H4 | =KKLEINSTE(A4:F4;1) | |
| I4 | =KKLEINSTE(A4:F4;2) | |
| J4 | =KKLEINSTE(A4:F4;3) | |
| K4 | =KKLEINSTE(A4:F4;4) | |
| L4 | =KKLEINSTE(A4:F4;5) | |
| M4 | =KKLEINSTE(A4:F4;6) | |
| O4 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H5 | =KKLEINSTE(A5:F5;1) | |
| I5 | =KKLEINSTE(A5:F5;2) | |
| J5 | =KKLEINSTE(A5:F5;3) | |
| K5 | =KKLEINSTE(A5:F5;4) | |
| L5 | =KKLEINSTE(A5:F5;5) | |
| M5 | =KKLEINSTE(A5:F5;6) | |
| O5 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H6 | =KKLEINSTE(A6:F6;1) | |
| I6 | =KKLEINSTE(A6:F6;2) | |
| J6 | =KKLEINSTE(A6:F6;3) | |
| K6 | =KKLEINSTE(A6:F6;4) | |
| L6 | =KKLEINSTE(A6:F6;5) | |
| M6 | =KKLEINSTE(A6:F6;6) | |
| O6 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H7 | =KKLEINSTE(A7:F7;1) | |
| I7 | =KKLEINSTE(A7:F7;2) | |
| J7 | =KKLEINSTE(A7:F7;3) | |
| K7 | =KKLEINSTE(A7:F7;4) | |
| L7 | =KKLEINSTE(A7:F7;5) | |
| M7 | =KKLEINSTE(A7:F7;6) | |
| O7 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H8 | =KKLEINSTE(A8:F8;1) | |
| I8 | =KKLEINSTE(A8:F8;2) | |
| J8 | =KKLEINSTE(A8:F8;3) | |
| K8 | =KKLEINSTE(A8:F8;4) | |
| L8 | =KKLEINSTE(A8:F8;5) | |
| M8 | =KKLEINSTE(A8:F8;6) | |
| O8 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H9 | =KKLEINSTE(A9:F9;1) | |
| I9 | =KKLEINSTE(A9:F9;2) | |
| J9 | =KKLEINSTE(A9:F9;3) | |
| K9 | =KKLEINSTE(A9:F9;4) | |
| L9 | =KKLEINSTE(A9:F9;5) | |
| M9 | =KKLEINSTE(A9:F9;6) | |
| O9 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H10 | =KKLEINSTE(A10:F10;1) | |
| I10 | =KKLEINSTE(A10:F10;2) | |
| J10 | =KKLEINSTE(A10:F10;3) | |
| K10 | =KKLEINSTE(A10:F10;4) | |
| L10 | =KKLEINSTE(A10:F10;5) | |
| M10 | =KKLEINSTE(A10:F10;6) | |
| O10 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H11 | =KKLEINSTE(A11:F11;1) | |
| I11 | =KKLEINSTE(A11:F11;2) | |
| J11 | =KKLEINSTE(A11:F11;3) | |
| K11 | =KKLEINSTE(A11:F11;4) | |
| L11 | =KKLEINSTE(A11:F11;5) | |
| M11 | =KKLEINSTE(A11:F11;6) | |
| O11 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H12 | =KKLEINSTE(A12:F12;1) | |
| I12 | =KKLEINSTE(A12:F12;2) | |
| J12 | =KKLEINSTE(A12:F12;3) | |
| K12 | =KKLEINSTE(A12:F12;4) | |
| L12 | =KKLEINSTE(A12:F12;5) | |
| M12 | =KKLEINSTE(A12:F12;6) | |
| O12 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H13 | =KKLEINSTE(A13:F13;1) | |
| I13 | =KKLEINSTE(A13:F13;2) | |
| J13 | =KKLEINSTE(A13:F13;3) | |
| K13 | =KKLEINSTE(A13:F13;4) | |
| L13 | =KKLEINSTE(A13:F13;5) | |
| M13 | =KKLEINSTE(A13:F13;6) | |
| O13 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H14 | =KKLEINSTE(A14:F14;1) | |
| I14 | =KKLEINSTE(A14:F14;2) | |
| J14 | =KKLEINSTE(A14:F14;3) | |
| K14 | =KKLEINSTE(A14:F14;4) | |
| L14 | =KKLEINSTE(A14:F14;5) | |
| M14 | =KKLEINSTE(A14:F14;6) | |
| O14 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
| H15 | =KKLEINSTE(A15:F15;1) | |
| I15 | =KKLEINSTE(A15:F15;2) | |
| J15 | =KKLEINSTE(A15:F15;3) | |
| K15 | =KKLEINSTE(A15:F15;4) | |
| L15 | =KKLEINSTE(A15:F15;5) | |
| M15 | =KKLEINSTE(A15:F15;6) | |
| O15 | =GANZZAHL(ZUFALLSZAHL()*6)+1 | |
Tabellendarstellung in Foren Version 5.48
Betrifft: AW: Makroproblem
von: Crazy Tom
Geschrieben am: 12.10.2014 18:12:43
Hallo
in Deinem Makro lässt Du die Zahlen 1 bis 42 nur einmal zu
deswegen rauscht es ab der Zeile 9 in eine Endlosschleife weil es in
Deiner Wend-Anweisung immer weiter geht und eine Zahl gesucht wird die noch frei ist
da aber alle 42 Zahlen schon vergeben sind geht es halt nicht weiter
MfG Tom
Betrifft: AW: Makroproblem
von: ReSt
Geschrieben am: 13.10.2014 18:12:29
Hallo Tom
Besten Dank für deine Antwort.
Ja das ist mir bis jetzt noch nie aufgefallen.
Ich habe das Makro jetzt pro Zeile angepasst, und es funktioniert wie ich es möchte.
Merci
Gruss Reto
