Filtr pro Excel 2003

[navstevnik]

Pro jistotu, ze budes vyzadovat skutecne kaskadove razeni filtru (filtrujes napr podle Cestina a dale pak podle V Herbari a daje jeste podle Rostlina), pripojuji takto doplneny soubor (je stejne "vykuchany").

[sutrserpa]

Jede to perfektně,ale upravil jsi verzi ve které není v "Herbáři" a "Rostlina" a mě se nedaří vložit do Visual Basic výběr pro sloupce V Herbáři a Rostlina,tak jak jsi to udělal v minulé verzi, do roletky to dostanu ale po doplnění Case 7 a 8 to nejde.
Case 1
BlokAddr = "b4:b"
Case 2
BlokAddr = "c4:c"
Case 3
BlokAddr = "d4:d"
Case 4
BlokAddr = "e4:e"
Case 5
BlokAddr = "f4:f"
Case 6
BlokAddr = "g4:g"
Case 7
BlokAddr = "h4:h"
Case 8
BlokAddr = "i4:i"
Case 9
BlokAddr = "b4:i"

[navstevnik]

V teto databazi jsou jednak polozky jazykovych skupin, tak i polozky V herbari a Rostlina. Tyto dve posledni polozky obsahuji pouze dve hodnoty (Ano, Ne). Unika mi smysl filtrovani pouze a jen podle polozky V herbari nebo Rostlina, ale budiz. Protoze obsahuji jen dve pouzitelne hodnoty, pak neni problem, pokud je potreba filtrovat jen podle techto polozek, pouzit primo automaticky filtr, kde je rozbalovaci nabidka cela a uplna.

Pokud je pozadovano filtrovat pouze a jen podle jazyka ( zde je pocet polozek v rozbalovaci nabidce nedostacujici), pouzij procedury pro filtrovani bez zaskrtnuti v Kaskadove razeni filtru, aktivuje se automaticky filtr jen pro vybrany jazyk a pozadovanou hodnotu. V opacnem pripade - jazyk a kaskadne dalsi filtr V herbari nebo Rostlina a nebo kaskadne oba filtry V herbari a Rostlina v libovolnem poradi, zaskrtni Kaskadove razeni filtru, aktivuje se automaticky filtr pro vsechny polozky zaznamu (tedy sloupce B:I) s tim ze je jiz fitrovano pro vybrany jazyk a pozadovanou hodnotu; a dale lze kaskadne filtrovat v polozkach V herbari a Rostlina "rucne" pouzitim tlacitek v hlavickach sloupcu. Jak jsem jiz uvedl, tyto dve polozky nemaji vice nez dve hodnoty, takze vyber v rozbalovaci nabidce pro filtry v techto polozkach je uplny na rozdil od polozek jazyky a bylo by nesmyslne to resit pouzitim procedur VBA.
PS: projdi si v napovede k Excelu vyznam kaskadove razeni filtru.
PPS: z pokusu o modifikaci procedury je videt, ze ti i presto, ze jsou pridany komentare, neni jasna struktura programu a jeho funkcionalita. Rozsahlejsi popis uz presahuje do oblasti profesionalniho (a tedy placeneho) poradenstvi.

[sutrserpa]

Máš pravdu s tím pochopením. Pokoušel jsem se program pochopit, tak abych ho mohl použít i v jiných listech kde je počet filtrovaných položek jiný a počet položek si upravit sám.
A pokud se jedná o kaskádový filtr tebou vytvořený, já musím filtrovat od jednoduších položek ke složitějším.
Musí začít filtrovat "V Herbáři a "Rostlina" a pak teprve to ostatní. A to mi bohužel tato aplikace neumožní.
Přesto jsem s výsledkem spokojený.