Příspěvky uživatele


< návrat zpět

Strana:  1 ... « předchozí  191 192 193 194 195 196 197 198 199   další » ... 298

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 5

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 1

?
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.


Strana:  1 ... « předchozí  191 192 193 194 195 196 197 198 199   další » ... 298

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

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.

On-line nástroje