Příspěvky uživatele

Tak som aj na tento pokus ešte znásilnil Evaluate, len už cez Names, lebo vzorec prekonal obmedzenia.
Ako by povedal vietnamský obchodník - "vykusááj"

Vy musíte mať pokaždé úplne inak koncipované dáta. To nie je možné. V prílohe som to zaslal už rozdelené - bezchybne. Skúšal som to aj na predošlý typ dát. Ako som spomínal miinule. ak hlavička prvého stĺpca udalosti začína textom "Čas", všetko ide. Teraz mi nepovedzte, že to zase tak nie je. Takže opäť mi pošlite súbor na ktorom to robí.
Hláška o 5 udalostiach je tam práve preto, že sa Vám očividne mení počet udalostí. Preto sa menia aj tlačítka. Je to urobené aj na 1 udalosť, a podfarbujúce Podmienené formátovanie na 20 udalostí. Zmien je mnoho, všetko funguje. Ale iba u mňa. U Vás sú záhadne vždy iné dáta.

EDIT: A posúvanie tlačítok kúsok vedľa spôsobuje Zoom. Neviem ako to ošetriť, keďže sa posúva na správne vypočítané miesto podľa bunky, len tá udáva pri Zoome nesprávne údaje o svojej polohe.

Komplet preprogramované, riešil som tam mraky vecí, ktoré postupne vyvstávali, ani sa mi to písať nechce. Rôzny počet udalostí, teda treba upravovať tlačítka, mazanie grafov, rôzne z počiatku nepredvídané stavy, staré dáta sú/niesú, zmena oblastí, prípadné chyby ...
Vyskúšajte.

Hmm, na prvý pohľad je to tak - problémom sú tie zlúčené bunky súčtov. Ja som podľa predošlého príkladu usúdil, že spoľahlivým rozlišovateľom je práve to, že prvých 6 zlúčených buniek od 6 riadku značí oddelenie udalostí (pred a za sú nepodstatné). Ale nie je to tak. Teraz ale pozerám, že bude asi možné použiť metódu, ktorú som navrhol ako úplne prvú. Rozdelenie podľa textu v prvom stĺpci. Ten totiž vždy obsahuje na začiatku textu "Čas" a "Čas otevření". To by snáď šlo. Viete zaručiť, že prvý stĺpec dát, nebude obsahovať text "Čas" inde, ako v hlavičke udalostí?

Ak máte minimálne Office 2019 použite MINIFS/MAXIFS:
=MINIFS([Tach Start];[Kalkulační jednice];[@[Kalkulační jednice]])
=MAXIFS([Tach End];[Kalkulační jednice];[@[Kalkulační jednice]])
CZ ekvivalent nepoznám, možno nie je preložená...

ak máte staršiu verziu, tieto funkcie nemáte, použite maticový vzorec (zadávate pomocou Ctrl+Shift+Enter):
=MIN(IF([Kalkulační jednice]=[@[Kalkulační jednice]];[Tach Start]))
=MIN(KDYŽ([Kalkulační jednice]=[@[Kalkulační jednice]];[Tach Start]))
=MAX(IF([Kalkulační jednice]=[@[Kalkulační jednice]];[Tach End]))
=MAX(KDYŽ([Kalkulační jednice]=[@[Kalkulační jednice]];[Tach End]))

Na tomto príklade Vám to robí? Alebo na iných dátach?
Toto je správny výsledok tohto príkladu. Pošlite mi Váš výsledok z tohto príkladu.
A ak to robíte na iných dátach, tak tie dáta na ktorých to robí chybu, tie mi pošlite aj s aplikovaným makrom, aj bez aplikácie. Dáta ak chcete iba anonymizujte, ale nemeňte umiestnenia, rozloženia, zlúčenia buniek, formáty, nemažte bunky. Iba prepíšte. Iba tak zistím, kde je chyba. Kľudne to môže byť inak zlúčená bunka, ktorá je v prvom stĺpci dát absolútne kľúčová pre zisťovanie umiestnenia udalostí. Iné odsadenie začiatku dát, čítanie dát z iného listu, čokoľvek. Až po chybný návrh makra, samozrejme.

Máte tam navyše @
=INDEX(DataPhm[@[PHM v M]];MATCH([@ID];DataPhm[@ID];0))
=INDEX(DataPhm[@[PHM v M]];POZVYHLEDAT([@ID];DataPhm[@ID];0))
vs
=INDEX(DataPhm[PHM v M];MATCH([@ID];DataPhm[ID];0))
=INDEX(DataPhm[PHM v M];POZVYHLEDAT([@ID];DataPhm[ID];0))

Otestujte

Skúste to popísať inak, alebo ešte lepšie manuálne vyrobte/vyfarbite ako má vyzerať výsledok. Lebo tiež v tom vidím nejaký ten logický rozpor.
Ak chcete farebne zvýrazniť bunku v číslom > 1 tak PF urobí čo chcete a zvýraznených nebude 8 buniek.
Ak chcete farebne zvýrazniť celú trojicu buniek, ak hociktorá v nej > 1, tak bude pomocou PF vyfarbené všetko.

A ten malý logický rozpor vidím podľa mňa vo vete
"- ak by niektoré číslo z vybranej trojice bolo väčšie ako 1 bunku zafarbí na červeno"
trojica vs 1 bunka
2 vzorky po 3 meraní denne - tomu nezodpovedajú dátumy

Takže udalostí je vždy 6 (ani viac ani menej), len sa nevie ktorá udalosť má koľko riadkov?
Všetko sa bude vždy vykonávať len na jednom a tom istom liste a vždy v rovnakých stĺpcoch?

Zisťovanie hraníc jednotlivých udalostí bude musieť byť na základe farby alebo prvých 6 zlúčených riadkov. Nemôže to byť ako som to urobil doteraz, podľa popisku, lebo v poslednej udalosti napr. popisky nie sú. Nemôžem ani použiť rýchlu metódu polí hodnôt, lebo potrebujete kopírovať celé bunky s formátom a podfarbením. Zistenie posledného riadku budem musieť ešte premyslieť, podľa toho, čo by mohlo nastať v 6. udalosti, ktorý stĺpec by sa dal použiť, prípadne či použiť UsedRange ...
Tlačítka v tom prípade nebude treba vytvárať vôbec. Veď ak sa nebude počet udalostí meniť, tlačítka budú fixné.

Dátumočas je vyjadrený desatinným číslom, kde celá časť sú očíslované dni od 1.1.1900 a desatinná časť vyjadruje pomerovú časť dňa. Ak tento Váš text prevediem na skutočný datumočas, chcete vymazať tie desatinné časti vyjadrujúce čas, alebo ich ponechať a len ten čas nezobraziť?

Takže tá príloha nesedí. Vy budete mať len jeden a ten istý list aj na vkladanie pôvodných dát pod seba, a zároveň v tom istom liste sa zmenia udalosti na usporiadanie vedľa seba (s čiastočným prepisom v prvých stĺpcoch, a zmazaním pôvodného usporiadania)?
Vkladanie pôvodného usporiadania bude vždy do oblasti Q1:AE1? Alebo vždy vedľa už spracovaných dát z predošlého spustenia makra? Teda napr. po tomto spracovaní by ste ďalšie vkladal na DH1:DV1? Ak je to tak, potom treba aj tlačítka vytvárať až za predošlými s posuvom posledného tlačítka "zobraziť všetko". A ak by to tak bolo, podľa čoho identifikujem, od ktorého stĺpca sú pridané zlúčené udalosti, a či sú vôbec pridané (či sa makro nepokúšate spustiť na už spracovanom zobrazení).
Tie "dátumy" a "čísla" v textových tvaroch by sa predsa mali previesť na skutočné dátumy a skutočné čísla vždy v rovnakých stĺpcoch pre každú udalosť, nie? Či každá udalosť má stĺpec na rovnakej pozícii ale s iným druhom dát???

To je ešte stále množstvo nezodpovedaných vecí...

Takže najlepšie by bolo, ak by ste sem vložil manuálne vytvorenú prílohu, s presne (!) vloženými zlúčenými udalosťami, napr. iba 3 udalosti s 1, 2, 3 riadkami reálnych dát (vymyslených, ale v takom formáte ako tam skutočne budú). A toto isté do druhej prílohy, ako to má presne (!) vyzerať po spracovaní.

Ono totiž veľmi záleží, či je to od 6 alebo prvého riadku, či od stĺpca C alebo Q, či 5 alebo 15 stĺpcov, či je počet stĺpcov rovnaký, či sú rovnakého formátu, či je variabilný aj počet udalostí, či sa prepisujú staré, alebo pridávajú stále vedľa, či je okolo týchto dát ešte niečo iné v okolných bunkách...

Musíte uviesť príklad tých tabuliek. Je to tabuľka alebo Tabuľka? Riadky spolu korešpondujú, alebo sa menia pozície? Počet riadkov rovnaký? Základné riešenie treba pomocou vzorcov, makrom, PowerQuery? ...

Nemám viac času. Vyskúšajte a doplňte pripomienky. Postupne ako som prichádzal na možné úskalia a prirábal ďalšie veci, sa makro stále len viac komplikovalo. Popis makra preto budem robiť až po úprave, nech to nerobím zbytočne.

Princíp je, že sa v cykle urobí pole, ktoré obsahuje subpolia s udalosťami. Tie sa následne vložia do tabuliek orámujú, zlúčia hlavičky a pod. Vytvoria sa čudlíky na skrývanie stĺpcov.

Tak skúste...

Pr.

To si tam dám iba nejaký znak (napr "?"), ktorý viem, že sa vo vzorci určo nevyskytne, a ten dám potom pomocou Replace hromadne nahradiť v reťazci mojou premennou "j"
alebo môžete použiť aj OFFSET/POSUN vo vzorci
"=když(COUNTIF(POSUN(G1:K1;" & j - 1 & ";);""a"")=5;""Hotovo"";""dělej"")"
alebo adresu do reťazca zobrať z hodnoty Range...Offset(...).Address približne:
"=když(COUNTIF(" & Sheets("List1").Range("G1:K1").Offset(j - 1, 0).Address & ";""a"")=5;""Hotovo"";""dělej"")"

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje