Databáze - vyhledávání i s duplicitními hodnotami

[only]

Ahpoj všem,

mám velikou prosbu :)
Mám databázi kde je hrozně moc hodnot a potřebuji v jiném listu vypisovat k zadanému ID hodnoty ktéré jsou v databázi k danému ID přiřazeny (celkem chci vypisovat 4 hodnoty k zadanému ID)
Problém je ale ten, že se dané ID v databázi může opakovat, potom bych chtěl aby dané hodnoty byly vypsány všechny (Například když se ID opakuje vícekrát, tak vypsat dané hodnoty pod sebe)
Plánoval jsem použít Svyhledat, ale problém je v tom, že končí u prvního nálezu :(

Prosím pokud někdo víte, tak mi z toho pomocte ven :)

Díky moc

--- Doplnění předchozího příspěvku (18 Srp 2012 16:01) ---

Jen ještě dodám, že bych nejraději bez makra, pokud tato možnost existuje :)

[Reklama]

[Azuzula]

První možnost by byla s podmíněným formátováním označit duplicity a pak tabulku seřadit podle barvy a druhá možnost je makro. Netuším, jestli by to vůbec šlo vyřešit vzorci.
Pokud by jste chtěl makro, tak sem přiložte nějaký demo sešit ať vím co se kam má vypsat.

[only]

Doplním, děkuji za pomoc

--- Doplnění předchozího příspěvku (19 Srp 2012 13:53) ---

Tak přikládám příklad databáze a reportu.

Co bych potřeboval pomoci je :
Aby když zadám do reportu ID prepacku, tak my to vyhledá dané hodnoty do reportu z archivu (linka,druhy chyby, komentář, příčina a okamžitá akce)
Jak již jsem psal výše, tak může být jedno ID opakované, tudíž k němu by mi vypsalo všechny záznamy.

Pokud tedy někdo budete vědět, tak Vám budu velice vděčný :)

Mějte se

[Azuzula]

Pokud to dobře chápu, tak se vyhledá ID v sešitu Archiv ze sloupce J a po shodě se vypíšou data ze sloupců K, T, X, Y a AA do tabulky v sešitu Report?

[only]

Přesně tak :)

--- Doplnění předchozího příspěvku (19 Srp 2012 17:15) ---

Jen ještě dodám, že se hodnota v archivu ve sloupci J může opakovat vícekrát a poté je potřeba vypsat všechny případy
DĚKUJI MNOHOKRÁT :)

[Azuzula]

Tak jsem něco napsala, makro se automaticky spouští po změně hodnoty buňky B1 když napíšete ID (V modulu thisworkbook)
V modulu s makrem si na začátku nastavte cestu k sešitu archivu, případně si změňte názvy sešitů pokud budou jiné. Přidala jsem do makra kontrolu otevření sešitu archivu, pokud je otevřený, tak se po vyhledání ID automaticky nezavře.

[only]

Děkuji :)
Aktuálně jsem to zkoušel - změnil jsem cesty a zadal ID. Excel začal pracovat, otevřel archiv ale bohužel nic nevypíše :( Možná je chyba ve mne, ještě budu zkoušet.
Myslíte, že může vadit, když je archiv zaheslovaný pro zápis ? Kazdopádně se na začátku excel ptá zda otevřít jen pro čtení a nebo vložit heslo,

[Azuzula]

Se zaheslovaným sešitem jsem to nezkoušela, odpoledne se na to podívám a pořeším to.

[only]

Děkuji mnohokrát !! :)

[Azuzula]

Tak jsem doplnila makro o otevření sešitu jen pro čtení a se zadáním hesla. Bohužel je tak heslo zapsané nešifrovaně přímo v makru a každý trochu znalý VBA se k němu může dostat. Jediná možnost je, zaheslovat projekt VBA čímž se zabezpečí i toto heslo, jenže když zapomenete heslo k VBA tak už se do toho nikdo nedostane.
Otevření sešitu provádí tento řádek (je v první polovině makra):

Kód: Vybrat vše

Workbooks.Open Filename:=cesta, ReadOnly:=True, Password:="heslo" '<-nastavit heslo k archivu

Tak snad to bude fungovat, protože mě excel sešit otevíral za všech okolností, jen se zeptal na heslo když jsem nastavila šifrování s heslem.

PS: Kdyby ani toto nefungovalo, tak do přílohy přidejte ten archiv co používáte, jen vymažte citlivá data ať můžu testovat reálný soubor.