Ale na to v poho stačí Podmienené formátovanie. Určite potrebujete makro ?
Nie, s povolením makier nemá uloženie súboru nič spoločné. To je vecou nastavenia Excelu Nastavenie - Centrum dôveryhodnosti - Nastavenie centra dôveryhodnosti - Nastavenie makier. Píšem z mobilu, tak snáď je to správne. Užívateľovy ale treba tiež trochu pomôcť a to tak, že sa makrom pri uložení skryjú všetky listy, a ostane iba zobrazený list s logom a upozornením na potrebu makier. Ak to užívateľ povolí, tak prebehne procedúra Wokbook_Open(), ktora ihneď zviditeľní potrebné listy.
Keď tak, podporte fórum.
That's All...
Aha, preklikol som sa asi o súbor vedľa, a nahral som Vám naspäť ten Váš. Soráč, mám tu už fakt bordel, asi tak na 3 dni mazania
Príloha vymenená v pôvodnom príspevku.
PS: Inak tie rozbalovacie čudlíky pri dátach sa dajú vo vlastnostiach KT vypnúť. KT ale nechce zobraziť sklad, v ktorom niesú žiadne hodnoty. Ak to takto byť nemôže, tak je tu možnosť makrom, alebo na PowerQuery je macher mepexg
Otáznik znamená :
"Myslíte to nejako takto ?"
No a v prílohe na 3. liste je KT, o ktorej ten otáznik pojednáva svojim obšírnym obsahom
?
EDIT: Výmena prílohy.
ZIP alebo 7-ZIP (je zadara). V najhoršom prípade premenujte príponu .xlsm na .zip (alebo pridajte za .xlsm ešte .zip), a dôkladne túto skutočnosť zdôraznite.
To by som netvrdil. Ak bude bunka iba jedna, tak vo Vašom zápise, nebude premenná typu pole ! Záleží na tom, čo s tým chcete robiť ďalej. Ak nasleduje nejaké spracovanie tej premennej ako pole, tak ten Váš prípad musí zákonite hodiť chybu, lebo nemáte čo indexovať. Môj kód Vám urobí pole 1x1, s ktorým pracujete v následnom spracovaní rovnako ako s akýmkoľvek iným poľom napr. 100x10000. Skúste si to. Pozor na to.
Pr.:
Sub zapamatuj()
Dim X As Long, Y As Long
Set My_Undo = Selection
With My_Undo
X = .Rows.Count
Y = .Columns.Count
ReDim My_array(1 To X, 1 To Y)
If X = 1 And Y = 1 Then My_array(1, 1) = .Value2 Else My_array = .Value2
End With
End Sub
Ale to iba v prípade súmernej, spojenej oblasti. Ak je označená oblasť obsahujúca viac AREAS, treba si každú zvlášť v cykle EACH uložiť napr do COLLECTION.
Napr. vzorec na 1000 riadkov.
To nepôjde, musíte si urobiť zlučovaciu tabuľku...
Tak takto asi nejako ...
A na čo je Vám na toto makro ?
Nakoniec ma niečo ešte napadlo (nový kód v pôvodnom príspevku). Ak sú Ano/Ne počítané vzorcom, pôvodné makro by ho nahradilo hodnotou, toto nové nie.
Upravené v predošlom príspevku.
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.