Příspěvky uživatele

Opravdu to při podmíněném formátování nejde. Excel má ale víc tváří. Znám vývojáře, kteří místo podmíněného formátování používají událost listu Change. Tam podobná omezení neplatí a buňku lze podle nabyté hodnoty naformátovat zcela libovolně.

API pro skrytí celého UserFormu s ponecháním zobrazení jeho prvků jsem neznal. Používal jsem pouze API pro potlačení hlavičky. Tohle vypadá elegantně! Použiji při první vhodné příležitosti. Dík!
Nutnost zbytečně klikat do zavolaného listu dál nechápu. Je-li kurzor nad listem, má tvar kříže; nad UserFormem se ukazuje šipka; na co ukazuji kurzorem, to je právě aktivní. To mi bohatě stačí. Pokud nevolám nějakou specifickou metodu nebo vlastnost pro ActiveWindow, nemám potřebu starat se, co je ActiveWindow.

Tomu nerozumím! Nebo je smyslem věci seznam ukázat, ale nedovolit ho používat? Pak ovšem nechápu filozofii takové nabídky. A k čemu je pak nakonec dobrá ta aktivace, když má být stále neaktivní??? Nějak se nechytám...

Co se týká aktivace nemodálního formuláře: pokud ho použiji běžným způsobem, aktivuje se automaticky kliknutím na jakoukoliv svoji aktivní součást a list stejně tak kliknutím na jeho plochu. To automatické přepínání pokládám za jednu z nejlepších vlastností nemodálního formuláře. Dokonce tento režim ani neumím změnit (možná to souvisí se zmíněným AppActivate Application.Caption z vašeho dotazu).

to elninoslov: asi máte pravdu s tím zip, šlo jen o okamžitý nápad bez dalších souvislostí. Jinak jsem se u zaslané přílohy opravdu dočetl, jak vznikla, takže tam žádný zmatek nehrozil.
Co vedlo autora tohoto fóra k tomu, že formát excelského sešitu nezařadil mezi přípustné formáty, nevím. Všichni si tady kvůli tomu musejí dávat trochu nohu za krk. Jinak klobouk dolů, komunikuje se tady pohodlně a s komfortem!

Mně se naopak nápad s přejmenováním sešitu docela líbil, protože je to jednodušší postup, než komprimace. Jen bych místo koncovky .txt pro ribbonové sešity doporučil přejmenování na .zip, protože ve skutečnosti to opravdu jsou soubory ve formátu zip.

Dodatek ke smyslu vašeho formuláře: zkusil jste klepnout pravým tlačítkem na některou z ikonek pro posun oušek se jmény listů (vlevo dole na monitoru)? Měl byste dostat podobnou nabídku jako při použití svého nemodálního formuláře.

Z výčtu události pro UserForm lze využít událost kliknutí na tělo formuláře (UserForm_Click) a kliknutí na zavírací křížek vpravo nahoře (UserForm_QueryClose). Za záhlaví můžete naopak formulář zachytit a přesunout. Událost pro kliknutí na záhlaví neznám.

Omluva: samozřejmě jsem měl na mysli obrat ActiveCell.Offset, kterými se kód hemží.

Ten kód je na můj vkus napsaný velmi exoticky. Očekával jsem rozsáhlé cykly, místo nich jsem našel zamilované hraní se zápisem ActiveShett.Offset, zato žádná pole ani definované oblasti na listu. Zápis by šlo několikanásobně zkrátit, ale významné zrychlení algoritmu by to nejspíš nepřineslo.
Přechod od Double k Single by přinesl jen nepatrné zrychlení, které vůbec nestojí za námahu. Zato zmenšení rozsahů v datech pro grafy ve vašem případě skrývá velký rychlostní potenciál. Deset tisíc prvků v sériích je podle mého soudu řádově vyšší, než lze na listu odlišitelně zobrazit. Cesta redukce rozsahů dat pro grafy je podle mne tím správným krokem za zrychlením výpočtů.

Mám dojem, že došlo ke zmatení pojmů stránka a list (viz subscript out of range). Vypadá to podle mne spíš tak, že na jednom datovém listu se nachází víc tiskových stránek a že jde o selektivní tisk těchto tiskových stránek podle obsahu vybraných buněk.
Pokud mám pravdu, rozdělil bych úlohu na dva kroky: v prvním bych definoval proceduru TiskStranky(Strana As Long), která by vymezila logickou oblast stránky a také ji vytiskla. Jako nadstavbu k této proceduře bych napsal rozhodovací předpis Tiskni(), který by určil, které stránky budu v konkrétním případě tisknout (např. na základě obsahu buněk ve sloupci D).

to desairo: převod doplňku z xls na xlam je zcela regulérní obrat, pokud Excel nenajde ve zdrojovém xls nějaké nekompatibility s ribbonovým Excelem. To se ve vašem případě zřejmě nestalo, takže vše nejspíš bude běhat správně.
S odpovědí eLCHa na možnost zrychlení se zcela ztotožňuji. Vypnutí všech přepočítávacích a přezobrazovacích akcí je tím prvním a základním krokem ze zrychlení. Pro posouzení, co by šlo ještě zrychlit, by bylo nutné vidět, jak je kód napsaný. Mne 35 sekund na provedení popsané akce zas tak moc neděsí. Ale stejně tak by to třebas mohlo běžet podstatně rychleji. Bez znalosti napsaného kódu to ovšem zodpovědně neposoudí nikdo!

Je horko, a to se nejspíš promítlo do kvality dotazu... Přesto se pokusím o odpověď:
1. Vzorec může nastavit jen hodnotu v buňce, ve které se vzorec nachází. Jakýkoliv pokus změnit vzorcem hodnotu jiné buňky je odsouzený k neúspěchu.
2. Pokud chci vzorcem na základě obsahu B1 nastavit obsah A1 a C1, musím do buněk A1 a C1 umístit dva různé vzorce. Do A1 napíšu =KDYŽ(B1="odpolední";"ranní";"").
Do C1 patří vzorec =KDYŽ(B1="odpolední";"noc";"").
3. Pomocí makra by bylo možné na základě testu změny hodnoty B1 naplnit najednou A1 i C1. To ovšem je jiná kapitola Excelu...

to eLCha: dvě souběžně fungující verze Office na jenom počítači mne zjevně vytrestaly. Dřív se mi vedlo měnit verze Office spolu s novým HW; tentokrát mi to nevyšlo. Smůla! Na druhou stranu mohu s úlevou konstatovat, že W-10 jsem nainstaloval během dvou hodin bez jediného zádrhele a že vše vypadá funkčně. A to i po velkém updatu W-10 tři dny po nainstalování (!?!).

to Elninoslov: podle mých informací nelze Office 2010 reinstalovat, když jsou instalované Office 2013. Nerad bych o Excel 2010 přišel. Používám je daleko radši než 2013.
To kp57: to už jsem vyzkoušel, ale bez viditelného výsledku

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje