Excel 2013 Kombinacje bez powtórzeń

W załączniku rozwiązanie bez użycia VBA, z wykorzystaniem funkcji LOS i wiersza pomocniczego. Prawdopodobieństwo wystąpienia powtórzeń istnieje tylko w teorii.

Skoro już rozpisałeś, to użyj jej jako tabelki pomocniczej.
Np:
wpisz rozpiskę w L1:O15
w H1 wpisz =PRZESUNIĘCIE($A$1;0;L1-1) i skopiuj 4 w prawo i 15 w dół
w h16 =PRZESUNIĘCIE($A$2;0;L1-1) i skopiuj 4 w prawo i 15 w dół
etc, etc



Ostatecznie możesz sobie napisać proste makro z wykorzystaniem tej rozpiski: pętla 'Do' z licznikiem wg kolumny A, wewnątrz której umieść podwójną 'For' (zewnętrzna 15 kroków, wewnętrzna 4) z przypisaniem: Cells(x + ((licznik'Do' -1)*15), y) = Cells(licznik'Do', liczba_z_tabelki)

ZbiguZbigu napisał:

szkoda mi teraz czasu na uczenie się tego

Cóż, forum stworzono dla tych, którym tego czasu nie szkoda...

Przy porannej kawie naszło mnie znaleźć rozwiązanie bez rozpiski i wyszła taka pętelkaMoże przyda się poszukującym w podobnych kwestiach.

Z tabelką (którą nota bene przepisałem z błędem /rys/), w układzie jak opisano wyżej, sprawę załatwia takie makro (skoro zacząłem, niech skończę) I to byłoby wszystko, jeśli chodzi o gotowiznę. Proponuję jednak spróbować własnych sił. To nie jest bolesne...

ZbiguZbigu napisał:

niestety to makro nie działa

Bo napisane w kodzie arkusza. Jeśli umieściłeś w module, zmień na lub coś podobnego.

Witam,

mam podobny problem. Rzecz wygląda następująco:
Mam x klas od 1 do n. Trzeba każdą porównać za sobą bez powtórzeń.
Byłbym wdzięczny gdyby ktoś mi opisał i wyjaśnił ogólny algorytm.
Będę to implementował w C++.

Pozdrawiam

wachuwach napisał:

... każdą porównać za sobą ...

No to jaki problem?
W pętli po I od 1 do n porównujesz tb[I] z tb[I]

problem jest taki, że to jest w jednej tablicy

przykładowo mam 6 klas(elementów) {1,2,3,4,5,6} i powiedzmy chcę je wyświetlić tak:

1,2
1,3
1,4
1,5
1,6
2,3
2,4
2,5
2,6
3,4
3,5
3,6
4,5
4,6
5,6

Na pewno jest na to jakiś prosty algorytm tylko nic mi do głowy nie przychodzi.
Oczywiście ma to być dla dowolnej ilości klas.

Wesołych Świąt

Dodano po 29 [minuty]:

Zrobiłem Prostsze niż myślałem.

Po pierwsze to się nie nazywa każdy ze sobą bez powtórzeń, zaś wszystkie pary bez powtórzeń.
Po drugie, nie stosuj i++ tam gdzie możesz zastosować ++i, to się zemści
Po trzecie, nie używaj pojedynczych znaków 'l' do nazywania zmiennych, to się zemści
Po czwarte, jak zastosujesz dobrodziejstwa C++ to wyjdzie:

adamas_nt napisał:

W załączniku rozwiązanie bez użycia VBA, z wykorzystaniem funkcji LOS i wiersza pomocniczego. Prawdopodobieństwo wystąpienia powtórzeń istnieje tylko w teorii.

Witam, szukam gotowego programu, który pokaże mi wszystkie możliwe kombinacje liczb.
Czy jest ktoś łaskaw zrobić w Excelu wszystkie kombinację 3 liczb z puli 42 liczb i 49 oraz oraz to samo tylko z 2 liczb.

Ktoś tutaj dodał załącznik tylko jest to 5 liczb z 10 i nie wiem jak to można zmodyfikować, iż się nie znam za bardzo na tym programie.

Jestem gotowy nawet kupić przez allegro gotowy taki projekt, jeśli było by w tym dużo pracy stworzyć coś takiego.

Chodzi mi o :
(3) z 42 liczb wszystkich kombinacji
(3) z 49 liczb wszystkich kombinacji
oraz to samo, lecz tylko (2) z 42 i 49


pozdrawiam i czekam na jakąś odpowiedź, kto się zna na tym programie i potrafiłby mi pomóc.

W załączniku umieszczam projekt, który dodał adamas_nt.

Albo naucz się elementarnych podstaw narzędzia którego używasz, albo zapomnij o projekcie.

-psiak- napisał:

For i = 1 To 42
For j = i+1 To 42

Myslim że [code:1] For i = 1 To 42
For j = i+1 To 41[/code:1]

JRV napisał:

Myslim ze

Kod: text Rozwiń Zaznacz wszystko Kopiuj do schowka

 For i = 1 To 42
    For j = i+1 To 41

Źle myślisz, jeżeli już to: ale i tak nie ma sensu tego robić, ponieważ dla i=42 pętla po j będzie od 43 do 42 czyli się nie wykona.

Niestety zbyt zielony jestem, abym chociaż wiedział gdzie te kody wkleić w Excelu. Chodziło mi o edycję tego pliku co podał autor powyżej. Wszystko pięknie tylko zamiast 42 licz jest 10 i jeszcze nie nie w kolejności tylko od 11-20.
Chciałem co jakąś wypłatę zaszaleć i zagrać, aby były możliwe w 100%, że trafię trójkę. Jak podaję strona lotto prawdopodobieństwo wynosi od 1:128 czyli jakieś 160zł na kupony mini lotto musiałbym wydać.

A próbowałeś wpaść na forum malarski i powiedzieć: - Niestety zbyt zielony jestem, abym ... więc kto pomaluje mi mieszkanie?

Szukałem poradników w internecie jak zrobić w Excelu wszystkie kombinacje trójek w mini lotto. Tak, żeby mieć 100% pewności, że trafię trójkę. Nigdzie nie ma takich poradników, są tylko chyba na c++, ale to język dla profesjonalnych informatyków i na pewno zwykły zielony kowalski tego nie ogarnie w jeden dzień.
Na Chomikuj są do pobrania wszystkie kombinacje dużego lotka czyli prawie 14 mln kombinacji, ale to nawet dla milionera jest nie osiągalne, ani nie opłacalne kiedy nie ma dużej kumulacji. Chyba, że podczas dużej kumulacji będzie miał ekipę, która w całej Polsce będzie oddawać blankiety do terminalów jak w ogóle nadążą z tak dużą ilością losów.

Prawdopodobieństwo trafienia trójki w mini lotto jest od 1 do 128.

Czyli trzeba obstawić 128 kombinacji. Czyli licząc jeden los za 1,25 trzeba na to wydać 160zł, aby mieć gwarancje na trafienie trójki.

Naucz się jakiegokolwiek języka programowania i zrób ten projekt samodzielnie, tym bardziej że ten projekt nie potrzebuje jakichś wygórowanych umiejętności. Lub zwyczajnie zamów wykonanie projektu.