[niedzviadek]

Mireczki potrzebny Mistrz #excel. Mam taki problem, robię konfigurator kasetonów LED(#grafika3d), że potrzebuję zrobić kombinację bez powtórzeń wszystkich możliwych wersji takiego kasetonu(obrazek poniżej).

Przykładowe kombinacje:
Prostokąt CZARNY Z PODŚWIETLENIEM G.NIEBIESKIE
Koło GRAFIKA 3 BEZ PODŚWIETLENIA G.BIAŁE

Czy wiecie jak to zrobić w excelu albo znacie jakieś narzędzie online?

#matematyka #kombinacje #problem #office

[e.....n]

@niedzviadek: na szybko taka formule:

Punkt 1.

'=IF(ROW()-ROW($F$1)+1>COUNTA(A:A)*COUNTA(B:B),"",INDEX(A:A,INT((ROW()-ROW($F$1))/COUNTA(B:B)+1))&INDEX(B:B,MOD(ROW()-ROW($F$1),COUNTA(B:B))+1))

Punkt 2.

Wstaw wszystko w kolumny A, B, C, D
Formule wstawiwazs do kolumny F1 i ciagniesz w dol az zrobi sie pusto. Potem kopiujesz do kolumny G dane z komorki C i wstawiasz formule do kolumny H. Zmieniasz w formule referencje na $H$1 i wszystkie count i indexy na F:F, G:G

Punkt 3.
znowu ciagniesz w dol i powtarzasz Punkt 2gi analogicznie

[e.....n]

@niedzviadek: obrazek pogladowy dla 3 kolumn

[niedzviadek]

@entaroadun: Dzięk mistrzu za odpowiedź :), niestety coś robię nie tak :/ excel daje błąd

[e.....n]

@niedzviadek: masz polskiego excela musisz uzyc polskich formuł. wyguglaj odpowiedniki

[niedzviadek]

@entaroadun: Nie zauważyłem że rzeczywiście angielskie :) ok spróbuję przepisać na PL. dzięki

[brak_nicku]

@niedzviadek: swego czasu tworzyłem procedurę VBA robiącą dokładnie coś takiego. Potrzebny był wydajny kod generujący duże ilości danych. Jeśli jesteś zainteresowany to daj znać - poszukam.

[niedzviadek]

@brak_nicku: Jeżeli będzie możliwość szybkiego wygenerowania takich kombinacji to jestem zainteresowany, tylko nie znam się na programowaniu w ogóle :)

[brak_nicku]

@niedzviadek:

Jeżeli będzie możliwość szybkiego wygenerowania takich kombinacji

"Szybkie" to pojęcie względne, ale milion wierszy razy 6 kolumn był generowany poniżej 10 sekund.

tylko nie znam się na programowaniu w ogóle :)

To wrzuć gdzieś przykładowy plik i wyślij mi link.

[niedzviadek]

@brak_nicku:
Super dzięki! :)
https://drive.google.com/file/d/0B-IJo9Azhdt2V3plU2JmbzZrdzA/view?usp=sharing
Plik excel.

[brak_nicku]

@niedzviadek: Tu jest przykładowy zrobiony na szybko plik:

http://www.filedropper.com/konfiguratorkombinacje

Jak to działa: jest tam procedura CrossJoin, która ma 2 parametry:
-zakres wejściowy (w przykładowym pliku D4:G11)
-komórka wyjściowa - lewy górny narożnik tabeli wyjściowej

Dodałem przycisk, po który podpięta jest procedura, która automatycznie wyznacza zakres wejściowy i wyjściowy:

Sub test()
 Dim rSrc As Range
 Dim rTrg As Range

 'region zawierający komórkę D3
 Set rSrc = Arkusz1.Range("d3").CurrentRegion

 'przesunięcie i zmiejszenie zakresu

[niedzviadek]

@brak_nicku: JESTEŚ MISTRZEM EXCELA. Masz u mnie medal z kartofla :D Dodałem sobie jedną kolumnę i dwa wiersze i ładnie wyświetliło kombinacje :)

[brak_nicku]

@niedzviadek: to taka szybka adaptacja istniejącej procedury, jest parę niedociągnięć typu - nie czyści wynikowego zakresu, więc sam musisz o to zadbać, ale zapewniam że zadziała sprawnie nawet dla dużej ilości wierszy

[niedzviadek]

@brak_nicku: mnie nic więcej do szczęścia nie trzeba teraz mogę sobie odhaczać kolejne zrobione wersję grafiki :) Dzięki dobry z Ciebie Mirek!