Příspěvky uživatele
< návrat zpět
Tiež ma až hrklo, keď som si prečítal o ďalšom stĺpci, a o pláne to ďalej kúskovať, ale budiš, keď budem môcť, tak to ešte prerobím, ale do nekonečna rozhodne nie. Ja sem mrknem X-krát denne, ale len na skok. Žiaľ potrebujem nejaký ucelený kus času na to, čo nemám. Včera som o polnoci zase zaspal za PC, kurňa ...
Ale je to zamknuté. Inak by to nepýtalo heslo v Revízia (pýta), inak by Vám dovolilo pridať riadok (nedovolí), a inak by Vám dovolilo pretiahnuť bunky za roh (nedovolí), mali by ste povolené pridať list (nemáte). Či je to zamknuté je zbytočná debata, lebo ani nikto netvrdí že to nieje, ale len že heslo nenašli. Mne to odstránilo 3 heslá (po jednom v sheetoch a jedno vo workbook). Máte to v súkromnej správe, ale možno som Vám to poslal rovnako poriešené ako StavrosJorgos, neviem. Skúmať čo bolo presne ako zamknuté sa ni nechce :)
Mne to píše, že tam boli 3 heslá, má to už od obeda v súkromnej správe a len dúfam, že Milan-158 je skutočne v danej firme, a neodomkol som to niekomu inému. Dávnejšie sme sa tu zhodli, že takéto veci sem nepatria. Teraz dostanem kvôli nemu sprda :)
Ale aj bez odomknutia má východisko - urobiť si to odznovu sám rovnaké podľa predlohy, a nezamknuté.
Dobrý nápad. Neskôr na to snáď mrknem. Teraz mám tú úpravu na čítanie z Ext. súborov rozpracovanú, len nemám to uhladené a okomentované. Možno večer...
Posielam odkaz na súbory
ale ešte raz POZOR, nieje to dokončené, sú tam zbytočné premenné, neodladené prípadné chyby pri otváraní, vyremované riadky atď. Je to iba rozpracované, teda iba použite iba na pokusy.
Ale keď má eLCHa podstatne rýchlejší nápad, tak myslím, že je dokončenie tohoto aj zbytočné... Inak s tými externými súbormi to trvá cca rovnako dlho 20 s (u mňa).
Nie, myslel som to tak, aby boli rovnako umiestnené. Teda budú vždy v liste "Zaměstnanci" v stĺpcoch napr. A a F a začínať budú v 5. riadku. Koľko ich bude, je putna, to si zistíme, keď si makro súbory otvorí.
To sú ale mimoriadne podstatné zmeny.
Nápad mám, no nemám čas.
-Makro si bude musieť tie externé súboru otvoriť a prečítať dáta.
-Spojí si 2 stĺpce v 2 poliach do jedného v cykle.
-Dôležité bude, či sa budú listy so zamestnancami vždy volať "Zaměstnanci", či budú v rovnakých stĺpcoch atď., a kde budú tie súbory uložené. Či tam, kde je tento súbor, alebo v nejakom stálom adresári.
PS: Tie bodky sú tam kvôli tomu, aby sme pri vyhľadávaní mali jednoznačne určený začiatok aj koniec mena. Ťažko bude mať niekto v mene znak "•" (Alt+0149). Lebo inak by pri hľadaní "Jan Thomas" našlo aj meno "Jan Thomas Burger", ale takto budeme hľadať "•Jan Thomas•" a "•Jan Thomas Burger•" nás nemôže pomýliť. Túto metódu by sme aj naďalej používali.
Čas ale nieje ...
Ano pravda, na takúto dôležitú vec som pri tejto verzii zabudol. Tak potom použite objekt Tabuľka, stále ešte bez makra. Tabuľka má vlastné čiastkové súčty (ale nemusí), celkový súčet je hore. Tabuľku rozšírite potiahnutím za pravý dolný roh, na potrebný počet riadkov kedy chcete.
Aj to má ale drobnú nevýhodu, ak Tabuľku zmenšíte za roh, ostanú pod ňou rozbaľovacie zoznamy (aj keď prázdne ak v nich nič nebolo), tie potom zmažete odstránením riadku za uško riadku, ak to vadí. Alebo proste Tabuľku zväčšujte ťahaním za roh, a zmenšujte vymazaním celých riadkov v nej (za tie ušká riadkov), a o nič sa nemusíte starať, ani o vzorce, ani formátovanie, ani súčty. Otestujte, lebo nemám čas už na testovanie.
Tie názvy mesiacov v rozbaľovacom zozname a v zozname na liste Data, sa Vám zmenia samé na také, na akom Office to spustíme. Jediné čo sa nezmení, je práve vybraná hodnota v B3. Iba tam vyberiete CZ mesiac namiesto slovenského. Iba raz. Viac to netreba. Takto som to urobil výhradne kvôli prvému písmenku názvu mesiaca - aby bolo veľké.
Žiadne makrá tam nemáte.
Ak môžu byť aj malé prvé písmená mesiacov, tak toto by malo fungovať na hocijakom Office. Vyskúšajte.
?
Keď si prečítam vetu ktorú ste napísal:
"Ještě v akce ma být Pohotovost kde se uctuje 13 korun za hodinu"
Tak mi z toho jasne plynie, že "Pohotovost" má byť v Akce.
Teda na odstránenie stačí odstrániť podmienku v stĺpci D, a odstrániť pohotovosť zo zoznamu akcií.
Ak má byť Pohotovosť aj samostatná Akcia v stĺpci Akcia (teda zo zoznamu akcií), aj zároveň samostatný stĺpec, tak tomu nerozumiem. Každopádne som to teraz tak upravil. Je tam aj pomocou PF zariadené, ak by ste tam zabudli čísla z 31 dňového mesiaca pri vypĺňaní 28 dňového, aby očervenelo. Preto tam pravdepodobne chcete mať čísla, a nie dátum v poli Datum, lebo by ste inak museli prepisovať všetky dátumy v každom mesiaci.
Makro zatiaľ nepotrebujete. Ušetrilo by Vám 1 klik na pridanie riadku, ale vyžaduje povolenia makier, čo nie každej firme z hľadiska bezpečnosti vonia. Súčty, aj PF, aj rozbaľovacie zoznamy sa pridajú aj keď pridáte nové riadky takto:
a) chcem pridať 1 riadok, kliknem na uško riadku pred ktorý má byť pridaný pravým myšítkom - Vložiť.
b) chcem vložiť X riadkov, označím za riadkové ušká počet želaných riadkov X tak, že prvý bude na tom riadku pred ktorý má byť vložený prvý, pravý klik - Vložiť
Toto by nefachalo spoľahlivo, ak by bol vkladaný riadok za posledný, preto je tam určenie oblasti urobené cez vyhľadanie slova "Součet".
Nedomyslené a/alebo nedovysvetľované. Km majú mať samostatný stĺpec, teda sa môžu pripísať k Akcii (alebo nemusia ak neboli faktúrované)? Pohotovosť má mať samostatný stĺpec (vypĺňanie podľa potreby k nejakej akcii), alebo to má byť samostatná akcia ? To je zásadný rozdiel. Podľa toho sa bude robiť konečný súčet a podľa toho sa môže meniť pomocou PF ak v stĺpci Cena formát. Napr v prípade, ak sa jedná o Pohotovost a tá má byť Akcia, nie stĺpec, tak sa zobrazí 13,- Kč/h, v inom prípade sa zobrazí 200,- Kč.
Na vysvetlení ste si dal pramálo záležať. Žiadne dáta, na ktorých sa dá stavať, všetko aby si tu ľudia vytvárali sami.
Ak chcete "nekonečný" formulár dajte súčty hore, kde ich netreba posúvať. Iba natiahnete rozbalovacie zoznamy. Ak Vám stačí výhľadovo napr. 20 riadkov, nechajte ich za nimi. Alebo použite objekt Tabuľka namiesto obyč. tabuľky.
Díky Stalker za zastúpenie pri objasňovaní :) Nebolo času.
Tu máte narýchlo verziu s pomocným reťazcom. Rozdiel je enormný.
Porovnanie robím na 20 000 záznamoch vs. 20 000 záznamov, pričom je 19 902 výsledkov aj v jednom aj v druhom prípade.
Čas pri metóde Match : 00:03:50
Čas pri metóde String: 00:00:20
Tu na fórum dávam prílohu bez dát.
Kompletná príloha s 20 000 záznamami je na GoogleDrive
Včera som sa k ďalšiemu variantu nedostal.
Keď ste ešte len na riadku
Day1 = .Cells(2, 1).Resize(R1).Value2
tak pole nieje naplnené, len je vytvorené, teda má veľkosť
riadky 1-5
stĺpce 1-1
každá hodnota je Empty (prázdna hodnota)
keď dáte ešte raz F8 a prejdete na ďalší riadok, až potom sa riadok vykoná a pole dostane hodnoty z patričných buniek. Ožltnutý riadok v kóde pri krokovaní je len označenie riadka, ktorý sa bude najbližšie vykonávať, nieje ešte vykonaný.
Tých podmienok je tam preto toľko, lebo ak je napr meno iba jedno, tak ho Excel do VBA nevráti ako pole 1x1 ale ako jednu hodnotu. Ďalej napr. ak jedno pole je prázdne, tak je zbytočná kontrola, lebo to znamená, že všetky z neprázdneho v prázdnom chýbajú, tak sa iba skopírujú, samozrejme iba v prípade, že nieje prázdne aj jedno aj druhé, a samozrejme s ošetrením ak by to nebolo pole ale iba jedna hodnota (viď vyššie), a kombinácie týchto podmienok. Skoro to isté vypodmienkovanie stavov platí aj pri následnom zápise. A tým sa stáva kód dlhý, a čo je dlhé, je zložité, a čo je zložité je náchylné k chybám.
...
PS: Inak vidíte našiel ste ďalšiu nepresnosť v poznámke:
Day1 = .Cells(2, 1).Resize(R1).Value2 'načítanie mien do poľa Day2
a
Day2 = .Cells(2, 4).Resize(R2).Value2 'načítanie mien do poľa Day2
majú rovnaký popisok, ale samozrejme pri kopírovaní riadkov kde sa mení iba R1 na R2 a Day1 na Day2 som zabudol zmeniť popisok na
'načítanie mien do poľa Day1
v prvom prípade.
EDIT: Inak pre programátora je jedna z najťažších vecí ošetriť všetky možné veci, čo dokáže užívateľ vo svojej vynaliezavosti vyparatiť. Nadáva sa tomu blbuvzdornosť. A je to začarovaný kruh. Preto aj často veľmi zložité veci, ako napr. Windows, majú veľa chýb, lebo ich univerzálnosť tlačí pred sebou nepredstaviteľnú komplikovanosť, previazanosť, závislosť a robustnosť kódov. Vývojári nemajú šancu, ešte že majú užívateľov, ktorý ich upozornia (niekedy aj pár rokov v kuse). 
No veď práve v tom linku je napísané toto:
Mám Office 2016 Professional x64 SK a nieje tam (doplnok Analytické nástroje mám zapnutý, ak by to s tým súviselo)
Uživatelské menu
\nMenu
On-line nástroje
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
RSS nejnovější články