Príloha?
(ak je to xlsm, treba to zabaliť do ZIP)
Toho je viac.
Musíte mať v prvom rade objekty pre každý jeden riadok popisov. Tie objekty musia mať názov "Popis01", "Popis02", ... a musia byť umiestnené na svojom mieste v obrázku.
Potom musíte tie indexy pripraviť v tom poli v makre Split("01,02 ...
Treba upraviť rozsah Range("R4:R13").
Všetko musí spolu korešpondovať v počte.
Ale mnohé veci sa dajú urobiť inak. Napr. globálna premenná aby sa nevytváralo to pole pri každej zmene označenia bunky, keďže toho bude veľa.
Alebo nepoužiť Filter na elimináciu v poli, ale kolekciu a mazať s kľúčom z nej.
Treba to ešte ošetriť na možné chyby (napr. chýbajúci objekt ...) ...
Ideálne by bolo to napasovať na reálnu prílohu, aby som aj ja videl ako sa to rýchlostne správa, a pokúšal sa nájsť schodné riešenie.
???
=SUM(INDIRECT("'"&ROW(OFFSET($A$1;;;E13))&"'!E57"))
=SUMA(NEPŘÍMÝ.ODKAZ("'"&ŘÁDEK(POSUN($A$1;;;E13))&"'!E57"))
E13 v súčtovom liste určuje posledný deň.
No veď PF (podm. formát)
=INDEX($A:$A;INT((ROW(A1)-1)/2)*3+COLUMN(A1))
=INDEX($A:$A;CELÁ.ČÁST((ŘÁDEK(A1)-1)/2)*3+SLOUPEC(A1))
To sa dá urobiť na milión spôsobov - makrom.
O tom som predsa písal a pýtal sa na to, 2x.
PF = Podmienené Formátovanie.
Stačí tam pridať DisplayFormat. Ak by ste tú farbu získaval vo funkcii, nie v procedúre, tak by sa muselo volať cez EVALUATE vlastná funkcia s parametrami. Ale to je zase niečo iné.
Preto treba písať vždy všetko, pridať presnú prílohu, a odpovedať !
Ak sú farby z PF, treba na to ísť úplne inak. Ale tak na otázky sa neodpovedá, tak to asi zvládnete...
Pri naštartovaní UserFormu?
Alebo je UserForm stále naštartovaný a počas práce meníte v liste bunky, a tie zmeny sa majú prenášať do Userformu hneď?
Ako sa bunky prefarbujú, manuálne alebo pomocou PF?
A to makro nemôžete poskytnúť?
Inštalovali sa aktualizácie? Skúste posledné za ten mesiac odinštalovať (on ich potom neskôr znovu ponúkne).
Nie je príliš zaplnený disk? Vtedy PC dosť laguje a to najme pri práci so súbormi ale aj odkladaním RAM do PageFile na disku.
Neprebieha práve nejaká príprava na Update? Rozbaľovanie v pozadí, ktoré žerie RAM, SSD, CPU?
Nebeží plánovaná kompletná AV kontrola?
Skúsil by som dočasne zastaviť službu SysMain, ktorá robieva problémy.
Čo hovorí na vyťaženie Správca úloh (CPU, SSD, RAM) ?
Nič iné sa na PC nespomalilo?
Nevisí tam aktualizácia Office (Súbor - Konto - Možnosti aktualizácie - Aktualizovať) ?
...
EDIT OT:
Ak máte klasický HDD, a ten má "šindelový" formát zápisu SMR, a začal presúvať dáta, tak na veľkom HDD pri veľa zmenách aj niekoľko dní mu bude trvať reštrukturalizácia dát, a Vy budete mať skoro nepoužiteľný PC. Ale to by bol vplyv na všetko, nielen na jedno makro. Dnes ak nie SSD ale HDD, tak určo systém zápisu CMR.
Všetko sa vypočítava na základe čísla riadku (mená, dátumy, z toho sa odvodzuje aj podm. form.). Môžete kopírovať celé tabuľky (od šedej nadhlavičky po posledný riadok na meno) ako chcete, len musí byť dodržané riadkovanie ako teraz, teda tabuľka vysoká 27 riadkov, zmena dátumového rozsahu o +7 je každých 54 riadkov, mená začínajú na 8. riadku tabuľky.
ALE.
To vyzerá, akoby ste tú tabuľky tlačil každý mesiac. Načo potom tie problémy, veď 4 týždne sa dajú urobiť aj manuálne PF. Alebo bude pod sebou tých mesiacov viac? To príloha samozrejme neodhaľuje, ani popis. Na celý rok? Teda od 1.1 - 31.12? Alebo na školský rok? To je veľký rozdiel v počítaní dátumov.
Tou prílohou som myslel trochu reálnejšiu prílohu aj s popisom. Aj tie sviatky som si musel ešte sám dorobiť.
Ľudia, ľudia...
EDIT:
A áno, že sa jedná o školské týždne som si prečítal, no to neznamená, že musia byť v tabuľke na oba roky, lebo tabuľka vyzerá, že sa tlačí a podpisuje - keďže je tam políčko podpis na každý deň.
Skúste, teraz som oba súbory prerobil, aby to boli naozaj dátumy.
Makro mám prerobené. Ale. Problémom bude ten dátumočas. V aktualizačnom aj aktualizovanom súbore sú dátumočasy vyplnené ako dátumočas, inak sú bunky v stĺpci ako text. ADO načíta všetko ako text. Pri kontrole teda eviduje nerovnaké hodnoty, a započíta do zmenených. Lenže preuloží ich ako text.
Otázka teda znie: Môže nastať, že v stĺpci "čas" bude aj iná hodnota ako dátumočas alebo prázdny text? Budem to musieť totiž vždy testovať a prevádzať na dátumočas. Prečo nieje teda celý stĺpec "čas" ako formát dd.mm.yyyy hh:mm:ss ale je v prázdnych ako "Text" ???
Priložte nejakú anonymizovanú prílohu, nech si to nemusíme najskôr všetko vymýšľať, predstavovať a vytvárať, aby sme to mohli vôbec vyskúšať riešiť či poradiť...
To makro žiadne zarovnanie neovplyvňuje. A ani nemusí. To si urobte na tú oblasť L4:L1000003 iba raz manuálne.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.