Forum strony www.multipasko.pl [Regulamin]


Dodaj wpis w tym temacie
Spis tematów
Login:

Hasło:
Strona: 1 2 ... 45 46 47 ... 51 52
Wyślij wiadomość do admina

Przewiń wpisy ↓

Excel- potrzebna pomoc

2021-03-24 (20:01)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 353
[ CZCIONKA MONOSPACE ]

@ fair_play

Makro funkcjonuje znakomicie
Mam do Ciebie jeszcze jedna WIELKA prosbe, byc moze excel/makro/ w Twoim wykonaniu zdola to rozwiazac. Otoz sprawa dotyczy niemieckiego lotto 6/49 , a konkretnie sprawdzania trafien. W lotto de trafienia zaczynaja sie od 2+,3,3+,4,4+,5,5+,6,6+. Problem tkwi w tym
jak sprawdzac trafienia z liczbami dodatkowymi / losowana liczba dodatkowa zawiera sie w przedziale od 0 do 9/. Na jednym kuponie mozna zawrzec 14 zakladow. Przy dluuugim rozpisie sprawdzanie bez aplikacji mija sie z celem. Napisze krotko jak ja to widze i czy jest to
mozliwe do wykonania. W arkuszu excela importuje rozpis z pliku txt. Jezeli kupon ma 14 zakladow/ a tyle ma /, to dla wylosowanej liczby dodatkowej "1" trzeba przypisac pierwsze 14 zakladow. Dla wylosowanej liczby dodatkowej "2" trzeba przypisac zaklady od 15 do 28.
Dla "3" - 29 do 42
dla "4" - 43 do 56
dla "5" - 57 do 70
dla "6" - 71 do 84
dla "7" - 85 do 98
dla "8" - 99 do 112
dla "9" - 113 do 126
dla "0" - 127 do 140 Potem znowu bedzie
"1" i zaklady od 141 do 153 i tak dalej do konca rozpisu. Czyli excel podzieli sobie rozpis na 14-zakladowe czesci. Powyzej jest 10 czesci "razy" 14 zakladow = 140. Dla 100 kuponow bedzie to /100x14/ 1400 zakladow. Jezeli zostanie wylosowana np liczba dodatkowa "1",
to ewentualne trafienia 2+,3+,4+,5+,6+ nalezy szukac na kuponie z zakladami 1-14, 141-154, 281-294 itd.Dla liczby dodatkowej "2" trafienia beda na kuponie z zakladami 15-28,155-168,295-308 itd. Czyli trzeba tez podac excelowi 6 wylosowanych liczb plus dodatkowa.
Idealem jest mozliwosc zaimportowania bazy losowan i sprawdzania trafien z wybranych losowan. Podsumowujac, excel powinien sprawdzic kazda linie rozpisu,tam gdzie wystepuja trafienia powinien podac informacje gdzie,ile,jakie trafienia / 2+,3,3+,4,4+,5,5+,6,6+/.Zerknij tez do zalacznika tu:https://megawrzuta.pl/download/62c9a78d6e4aac605288d24291f701e1.html
Jak cos napisalem niezrozumiale, to chetnie jeszcze raz przepisze.
Pozdrawiam
2021-03-24 (23:30)

status makinero
Data rejestracji: 2017-04-10
Ilość postów: 8697

15235
wpis nr 1 354 397
[ CZCIONKA MONOSPACE ]

@grem10 - problem polegał na tym, że ścieżki należy zaopatrzyć w cudzysłów, ponieważ spacje stwarzają problem. Ktoś mi podpowiedział i jest teraz DOBRZE.

--- wpis edytowano 2021-03-24 23:30 ---

2021-03-25 (00:44)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
wpis nr 1 354 406
[ CZCIONKA MONOSPACE ]


siger7>

Nie mam pojęcia o zasadach niemieckiego lotto, ale chyba wiem o co chodzi.

Nie bardzo rozumiem jednak Twoje wyliczenia wygranych:

Trafienia 2+ 7x w zakładach 29,30,31,32,33,34,35 ?
Bo przecież zakład 31,35 to 5+,

Trafienia: 3 20x ?
Przecież sprawdzeniu podlega tylko 14 zakładów (29-42)

Trafienia 3+ 3x w zakładach 38,40,41 ?
Przecież w nich nie ma liczby dodatkowej.

Czy na tym arkuszu pozostały jakieś śmieci nie dotyczące tego losowania ?

Jedno istotne pytanie.
Jak jest w sprawdzaniu traktowana liczba dodatkowa 0, jako 10 czy nie uwzględniana ?
2021-03-25 (18:57)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 515
[ CZCIONKA MONOSPACE ]

@fair_play
W niemieckim lotto jest losowanych 6 liczb z 49 i jedna dodatkowa z zakresu 0-9 / film :
Liczba dodatkowa jest przypisana do kuponu. Czyli moge skreslic do czternastu zakladow/ tyle jest na kuponie/ z jedna liczba dodatkowa / fotki w zalaczniku: https://megawrzuta.pl/download/ee24debcedcbbb61097425fae6de8c72.html/.
Przyklad : moje typowanie to 1,7,18,32,35,41 dodatkowa "1"; wylosowano 1,3,18,30,31,41 dodatkowa "1". Tutaj widac, ze trafnie wytypowalem 1,18,41 i liczbe dodatkowa "3". Trafne wytypowanie liczby dodatkowej oznacza nic innego jak wyzsza wygrana niz trafienie zwyklej trojki. Tak jest w przypadku wyslania jednego zakladu. Jezeli wysle jeden kupon z 14 zakladami i z trafnie wytypowana liczba dodatkowa, to wystarczy trafnie wytypowac conajmniej 2 liczby, aby zaliczyc wygrana najnizszego stopnia /2+/.
Od 0 do 9 jest dziesiec cyfr/liczb/. Jezeli rozpis liczy 140 zakladow /10 kuponow x 14/, to obstawiam wszystkie liczby dodatkowe.
Przykladowo pierwsza czternastke przypisuje do liczby dodatkowej "1"
druga czternastke przypisuje do liczby dodatkowej "2"
trzecia czternastke przypisuje do liczby dodatkowej "3"
czwarta czternastke przypisuje do liczby dodatkowej "4"
piata czternastke przypisuje do liczby dodatkowej "5"
szosta czternastke przypisuje do liczby dodatkowej "6"
siodma czternastke przypisuje do liczby dodatkowej "7"
osma czternastke przypisuje do liczby dodatkowej "8"
dziwiata czternastke przypisuje do liczby dodatkowej "9"
dziesiata czternastke przypisuje do liczby dodatkowej "0"
jedenasta czternastke przypisuje do liczby dodatkowej "1"
12 do "2"
13 do "3"
14 do "4"
15 do "5"
16 do "6"
i po kolei dalej/przy dluzszym rozpisie/.
Excel/makro/ powinien miec zaimportowany rozpis i losowanie 6 liczb plus liczba dodatkowa.
Program powinien "podzialkowac" rozpis na czternastoelementowe czesci z przypisanymi im liczbami dodatkowymi/jak wyzej/. Ewentualne trafienia powinien szukac w odpowiednich czternastkach z odpowiednio przypisana liczba dodatkowa, na podstawie wpisanego
losowania z liczba dodatkowa. Jezeli wylosowano liczby jw tj 1,3,18,30,31,41 dodatkowa "1", to powinien przeszukac pierwsza czternastke, jedenasta i wielokrotnosc, jak jest dlugi rozpis.


ad1?. masz racje powinno byc 5x /jak latwo sie pomylic /
ad2?.podalem zwykle trafienia z calosci rozpisu /bez "+" /
ad3?. nie / jak to mowia, nie ma trudnych pytan, sa tylko trudne odpowiedzi /
ad4?. wylosowywana jest liczba dodatkowa "0", ma ona przypisana swoja czternastke/ na pozycji 127-140/, program musi wiedziec co i gdzie ma szukac.
W wyslanym wczoraj arkuszu "liczba dodatkowa-zaklady" sa podane przedzialy w ktorych program powinien szukac trafien dla odpowiednio wylosowanych liczb dodatkowych. Np dla "1" to przedzialy 1-14,141-154,281-294,421-434,561-574,701-714,841-854,981-994,1121-1134,1261-1274, 1387-1400 /dla 100 kuponow/. Jezeli moge cos jeszcze z innej strony opisac, to bardzo prosze, pozdrawiam.


2021-03-25 (20:04)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
wpis nr 1 354 533
[ CZCIONKA MONOSPACE ]


siger7>

Podział na kupony, grupy już opanowałem.

Pozostaje kwestia jak przy sprawdzaniu trafień traktować liczbę dodatkową "0" ?

Czy można wtedy trafić coś z "+" ?
Bo jak w przypadku pozostałych liczb dodatkowych mogą być one skreślone na kuponie i wtedy trafiamy z "+".

A co z liczbą dodatkową "0" ?
2021-03-25 (21:49)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 562
[ CZCIONKA MONOSPACE ]

@fair_play
Obejrzales zdjecia z podanego linku ?
Liczba dodatkowa jest przypisana do kuponu, mozesz ja sam wybrac suwakiem
1.Moje typy : 1,3,15,22,32,46 dod 3 ; maszyna wylosowala : 1,3,18,25,34,41 dod 1
Trafienia : 1,3 - zero wygranej

2.Moje typy : 1,4,15,22,32,46 dod 3 ; maszyna wylosowala : 1,3,18,25,34,41 dod 3
Trafienia : 1 plus dod 3 czyli 1+

3.Moje typy : 1,4,15,22,32,46 dod 3 ; maszyna wylosowala : 1,8,15,24,32,43 dod 3
Trafienia : 1,15,32 plus dod 3 czyli 3+

Liczba dodatkowa odnosi sie do kuponu, jest jakby numerem kuponu, na ktorym zakreslasz zaklady. Liczby dodatkowej nie skresla sie, liczbe dodatkowa sie typuje - przyklad pierwszy i - patrz fotki.
Losowane liczby dodatkowe sa po to, aby zmniejszyc prawdopodobienstwo glownej wygranej z 1:do ok.14 mln do 1:do ok. 140 mln. A w druga strone kusza wysokimi wygranymi.
2021-03-26 (05:41)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 582
[ CZCIONKA MONOSPACE ]

@fair_play
Po pracy zrobie i wysle arkusz z zaznaczeniem co program powinien szukac i gdzie.
Milego dnia
2021-03-26 (13:44)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
wpis nr 1 354 635
[ CZCIONKA MONOSPACE ]

siger7>

Chyba nieco niepotrzebnie namieszałeś w tych opisach
Z tymi 14 zakładami na kuponie, tymi kolejnymi Superzahl (1-0) w kolejnych kuponach, powtarzanymi co 14 zakładów i.t.d.

To przecież są tylko Twoje decyzje, które mogą być dowolnie różne.
Jedynym wymaganiem lotto.de jest przypisanie kuponowi określonej liczby dodatkowej, która jak podejrzewam jest domyślnie przypisana już na starcie, gdyby grający zapomniał jej wybrać.

Cała reszta to wybór grającego.

Posłużę się przykładem.

Jest taki SMI na 22 liczby w 77 zakładach gwarantujący 3-kę przy trafieniu 3 z 22 liczb.
Grający może go wysłać na wiele różnych sposobów np. :

1. 77 kuponów po jednym zakładzie na każdym, przypisując każdemu kuponowi dowolnie różną liczbę dodatkową. Może przypisać każdemu kuponowi taką samą.

2. 10 kuponów po 7 zakładów na każdym z taką samą możliwością przypisania kuponom różnych lub jednakowych liczb dodatkowych.

3. 5 kuponów po 14 zakładów i 1 kupon z pozostałymi 7 zakładami i również z dowolnym wyborem liczby dodatkowej dla każdego kuponu.

Reasumując sprawdzanie jest bardzo proste:

W arkuszu excela wczytujesz:

W kolumnach "A-G" zakłady - w kolumnie "G" wpisana jest liczba dodatkowa przypisana kuponowi z tymi zakładami (tę przypisaną liczbą dodatkową musisz mieć przy każdym zakładzie w importowanym pliku tekstowym).

W kolumnach "L-R" wyniki losowań (w kolumnie "R" wylosowana liczba dodatkowa)

W kolumnie "S" znakiem "X" zaznaczasz losowanie które sprawdzasz.

Naciskasz przycisk "Sprawdzian" i ...

W kolumnach "U-X" otrzymujesz wynik sprawdzania.

Pobierz:
https://uploadfile.pl/pokaz/2145909---ywco.html

Powodzenia
2021-03-26 (18:04)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 669
[ CZCIONKA MONOSPACE ]

@fair_play
Zanim uniose Cie do gory na rekach i zanurze w pucharze piwa, podpowiedz prosze jeszcze jak wpisac automatycznie /za pomoca formuly/ do kolumny G po: 14 jedynek, dwojek, trojek, czworek, piatek, szostek, siodemek, osemek, dziewiatek, zerowek. W sytuacji kiedy np rozpis ma 140 kuponow lub wiecej, samo reczne kopiowanie zajmie mnostwo czasu.....
2021-03-26 (19:28)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 700
[ CZCIONKA MONOSPACE ]

@fair_play
Testuje "sprawdziana", czy oprocz wszystkich zalet, ktore posiada, mozna dolozyc jeszcze jedna ? Zajmie tylko kilka linijek.
Chodzi o zbiorcze wyswietlenie informacji ile jest trafien :
2+ = xxx
3 = xxx
3+ = xxx
4 = xxx
4+ = xxx
5 = xxx
5+ = xxx
6 = xxx
6+ = xxx

--- wpis edytowano 2021-03-26 19:28 ---

2021-03-26 (20:34)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
wpis nr 1 354 714
[ CZCIONKA MONOSPACE ]


siger7>

Numerację grup załatwi taka procedura makro:

Sub grupy()

zakładów = Application.WorksheetFunction.CountA(Range("A1:A65536"))

For y = 0 To zakładów - 1 Step 140
For n = 0 To 9
For yy = 0 To 13
Cells(y + yy + n * 14 + 1, 7) = (n + 1) Mod 10
If y + yy + n * 14 + 1 = zakładów Then
GoTo koniec
End If
Next
Next
Next
koniec:

End Sub
2021-03-26 (21:20)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 725
[ CZCIONKA MONOSPACE ]

@fair_play

Makro mi sie nie uruchamia, cos robie zle ?
2021-03-26 (21:32)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
wpis nr 1 354 730
[ CZCIONKA MONOSPACE ]


siger7 >

Uzupełniona wersja:

https://uploadfile.pl/pokaz/2145981---qwyo.html
2021-03-26 (23:15)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 753
[ CZCIONKA MONOSPACE ]

@fair_play

Zerknij do arkusza na pozycje 37, w podsumowaniu nie jest wykazana
https://uploadfile.pl/pokaz/2145999---aeyc.html
2021-03-27 (00:23)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
wpis nr 1 354 757
[ CZCIONKA MONOSPACE ]


podmień ten fragment w procedurze sprawdź():

For y = 1 To wygranych
If Cells(y, 21) = 2 And Cells(y, 22) = "+" Then Cells(1, 30) = Cells(1, 30) + 1
If Cells(y, 21) = 3 Then Cells(2, 30) = Cells(2, 30) + 1
If Cells(y, 21) = 3 And Cells(y, 22) = "+" Then Cells(3, 30) = Cells(3, 30) + 1
If Cells(y, 21) = 4 Then Cells(4, 30) = Cells(4, 30) + 1
If Cells(y, 21) = 4 And Cells(y, 22) = "+" Then Cells(5, 30) = Cells(5, 30) + 1
If Cells(y, 21) = 5 Then Cells(6, 30) = Cells(6, 30) + 1
If Cells(y, 21) = 5 And Cells(y, 22) = "+" Then Cells(7, 30) = Cells(7, 30) + 1
If Cells(y, 21) = 6 Then Cells(8, 30) = Cells(8, 30) + 1
If Cells(y, 21) = 6 And Cells(y, 22) = "+" Then Cells(9, 30) = Cells(9, 30) + 1
Next
2021-03-27 (08:10)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 761
[ CZCIONKA MONOSPACE ]

@fair_play

Bardzo serdecznie dziekuje Ci za pomoc mi okazana, wklad pracy, poswiecony czas, cierpliwosc , bardzo mi pomogles. Okazuje sie, ze dla excela nie ma rzeczy niemozliwych. Zycze Ci kolejnych sukcesow w ukladaniu rekordowych mistrzowskich rozpisow !
Pozdrawiam serdecznie,milego dnia
P.S. Korekta zrobiona,dziala.
Moze skusisz sie na zalozenie wlasnego watku ?
2021-03-27 (09:18)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 769
[ CZCIONKA MONOSPACE ]

@fair_play

Zerknij do arkusza na pozycje 74, w podsumowaniu wystepuje raz jako "zwykla", drugi raz jako z "+".
https://uploadfile.pl/pokaz/2146061---xyyt.html
Jakie sa ograniczenia w ilosci sprawdzanego rozpisu ?

--- wpis edytowano 2021-03-27 09:18 ---

2021-03-27 (11:24)

status fair_play
Data rejestracji: 2016-05-12
Ilość postów: 7813

14865
wpis nr 1 354 794
[ CZCIONKA MONOSPACE ]

podmień jeszcze raz:

If Cells(y, 21) = 2 And Cells(y, 22) = "+" Then Cells(1, 30) = Cells(1, 30) + 1
If Cells(y, 21) = 3 And Cells(y, 22) = " " Then Cells(2, 30) = Cells(2, 30) + 1
If Cells(y, 21) = 3 And Cells(y, 22) = "+" Then Cells(3, 30) = Cells(3, 30) + 1
If Cells(y, 21) = 4 And Cells(y, 22) = " " Then Cells(4, 30) = Cells(4, 30) + 1
If Cells(y, 21) = 4 And Cells(y, 22) = "+" Then Cells(5, 30) = Cells(5, 30) + 1
If Cells(y, 21) = 5 And Cells(y, 22) = " " Then Cells(6, 30) = Cells(6, 30) + 1
If Cells(y, 21) = 5 And Cells(y, 22) = "+" Then Cells(7, 30) = Cells(7, 30) + 1
If Cells(y, 21) = 6 And Cells(y, 22) = " " Then Cells(8, 30) = Cells(8, 30) + 1
If Cells(y, 21) = 6 And Cells(y, 22) = "+" Then Cells(9, 30) = Cells(9, 30) + 1

"Jakie sa ograniczenia w ilosci sprawdzanego rozpisu ?"

Ilości czego ?

Jednym ograniczeniem jest maksymalna liczba wierszy w arkuszu, a ta wynosi 1 048 576 więc tyle zakładów możesz sprawdzać
Drugim ograniczeniem jest maksymalna liczba kolumn 16 384, ale z tego nie skorzystasz

--- wpis edytowano 2021-03-27 11:38 ---

2021-03-27 (15:52)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 354 842
[ CZCIONKA MONOSPACE ]

@fair_play

No i zatrzymalo sie sprawdzanie na 65526....ale po drobnej korekcie ruszylo dalej
Reasumujac, na malym rozpisie i na bardzo dlugim wyniki sa zgodne z wynikami innego programu / ktory nie obsluguje "+" /.
Wiedzialem, ze dasz rade No i jak Ci mam wyslac te "skrzynke" ? Napisz mi prosze na maila sposob dostawy / https://forum.multipasko.pl/5239?page=17&sort=&dir=
wpis nr 1 297 884/.
Pozdrawiam i jeszcze raz bardzo dziekuje.
2021-03-28 (18:44)

status siger7
Data rejestracji: 2017-07-30
Ilość postów: 199

15381
wpis nr 1 355 055
[ CZCIONKA MONOSPACE ]

@fair_play

Potrzebna pomoc.....Sytuacja podobna jak przy usuwaniu linii rozpisu zawierajacych okreslone pary. Potrzebuje formule, ktora wyszuka linie rozpisu zawierajace liczby wieksze od 13 w kolumnie D, podglad, sortowanie, usuniecie itd.
https://uploadfile.pl/pokaz/2146280---vzil.html
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lottoStrona: 1 2 ... 45 46 47 ... 51 52
Wyślij wiadomość do admina