Příspěvky uživatele

V příkladu chybí úvodní tečky před LisBox. A ještě něco: pokud se sloupce nevejdou na šířku, prvek se sám doplní o vodorovný posuvník; to samé platí pro výšku ListBoxu se svislým posuvníkem.

Podle mých testů mi vychází jako nejrychlejší naplnění ListBoxu z dvourozměrného pole, např.
Dim Pole(1 To 20, 1 To 15)
' naplnění Pole hodnotami
With UserForm1
ListBox1.ColumnCount = 15
ListBox1.List = Pole
End With

Tohle není z mé hlavy, tak to mabízí Walkenbach. Pokud nedefinuji ColumnWidths, vzniknou sloupce 1 palec široké. Opět ne z mé hlavy, tentokrát z excelského helpu.

Prakticky shodný postup jsem kdysi také použil a také jsem s ním měl úspěch. Pak mi nějaký koumák předvedl, jak zavřít sešit, aniž by byla použita událost Before_Save, která vracela viditelnost datových listů do skrytého stavu. A příští otevření sešitu se zakázanými makry ukazovalo data, která měla zůstat skrytá. Pokazilo mi to náladu, ale uživateli jsem nic neřekl. A ten si na oplátku nikdy nestěžoval, že by někdo moji ochranu prolomil.
Excel není datově bezpečné prostředí a asi nikdy takové nebude. Kdo je koumák, něco vždycky vymyslí. Ochrany dat v Excelu slouží k tomu, aby nedošlo k náhodnému a nechtěnému styku uživatelů s chráněnými daty. Proti záměrnému a chytrému útoku ostatně nejsou ochráněna ani ta nejtajnější data těch nejtajnějších institucí...

Jestli vidím dobře, odkaz je na letošní příspěvek. Já ten "svůj" Immediate nezpracně užívám už cca deset let... Nevím, proč psát rutinu na něco, co se bez ní obejde.

Mám pocit, že jste si postavil hlavu a použití funkce NEPŘÍMÝ.ODKAZ jste povýšil nad důvod, pro který jej potřebujete. Vše nasvědčuje tomu, že tudy cesta nevede a že s Járou Cimrmanem získáváte body za hledání neprůchodných cest. Podle toho, jak jste popsal svůj problém, je ZVOLIT dostatečným a naprosto přijatelným řešením popsané potřeby.

Ještě malá poznámka k automatickému spouštění úloh: sám to nepoužívám, ale už několikrát jsem tu potřebu komentoval. Windows odedávna obsahuje Plánovač úloh, který automatické spouštění úloh umí. Z mně neznámých důvodů vždycky byl a dál je nějak schovaný, takže o něm většinou lidé neví. Ve W-10 jsem ho teď našel v nabídce Všechny aplikace / Nástroje pro správu Windows.

Nějak se nechytám. Když po dobu vaší dovolené nikdo do lhůtníku nepoleze, nebude se v té době žádným způsobem aktualizovat. Pak nic nebrání tomu, abych pomocí automatického filtru vygeneroval dopředu seznamy pro 1 až 7 a abych dal ty výstupy "svým klukům" předem do ruky.

Ne že by to nešlo řešit složitě, ale mně připadá, že stačí pro lhůtník aktivovat automatcký filtr, zadat výběr pro "počet dnů do konce" na 1 a vzniklý výběr zkopírovat na nový list.

Omluva - příloha na zvláštním talířku

Podobnou úlohu pro sledování termínů jsem řešil s dobrou uživatelskou odezvou přímo ve "lhůtníku" s využitím podmíněného formátování a podbarvení buněk s termíny, vázaného na kritérium DNES() s možným rozlišením na "propadlé", "dnes", "zítra", "do týdne"... Aby splněné úkoly nestrašily jako propadlé, řádek obsahoval také indikaci "hotovo", kterou ten podmíněný formát bral v úvahu.

Riziko, že se v novém Excelu objeví nějaká nová funkce, bude existovat vždycky. To, že anglickou funkci začnou naši lokalizátoři v nové verzi Excelu překládat odlišně, je projev jejich totálního idiotismu. Lašákům bych tuhle zhovadilost určitě nevyčítal.
Bylo by dobré vědět, že vzorce v buňkách si Excel interně ukládá zásadně v anglické podobě a v R1C1 notaci. Jednotlivé varianty zápisu lze vyvolat jako vlastnosti Formula, FormulaR1C1, FormulaLocal a FormulaLocalR1C1. Stejný vzorec s anglickou funkcí LEFT zobrazí jeden český Excel jako VLEVO a jiný Excel jako ZLEVA a v obou případech to bude počítat správně. Vypadá to jako bordel, ale znalec se vyzná...
Každý nástroj typu samostatného převodníku, stojící mimo Excel, bude zákonitě zatížen výše uvedenými nedostatky. Proto se opakovaně přimlouvám za využívání okna Immediate pro převody mezi českým a anglickým zápisem vzorců, stejně jako pro převod mezi zápisy v notaci A1 a R1C1. V tom okně získáme vždycky přesně ten převod, který odpovídá aktuální verzi Excelu, se kterou zrovna pracujeme.

Jen pro upřesnění: není podstatné, že po A následuje cifra, ale že po něm nenásleduje otvírací závorka. Jenom string, následovaný otvírací závorkou, může být jménem funkce.

Každé složitější řešení obsahuje řadu implicitních omezujících podmínek, které lze nazvat jako rozumné chování. Za totální blbuvzdornost úlohy se zpravidla platí neúměrnou složitostí obsluhy. A ani to často nestačí.
Dopisování údajů do řádků nad tabulkou za rozumné chování nepokládám. Stejně tak použití vzorců s prázdnými hodnotami v řadách se záhlavím. Za blbost se má platit a nevadí mi, když nerozumné chování uživatele vede na nefunkčnost úlohy. Na druhou stranu je dobré upozornit, čeho se má uživatel vyvarovat.
Pokud názvy nefungují na tabletech, pak by na to měl Microsoft někde výrazně upozornit. O tomto problému slyším poprvé a takové omezení Excelu je opravdu na pováženou. Co ještě na tabletech z Excelu nefunguje? Jaký Excel je na tabletu nainstalovaný?
Jinak plně souhlasím, že se pokoušíme dělat účet bez hostinského. Je na čase, aby se do diskuse zapojil autor dotazu.

To by některé věci zjednodušilo a jiné otázky by to zase nastolilo (minimálně určení měsíců k sečtení). Vzorce by kvůli tomu možná byly dokonce složitější...

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje