Příspěvky uživatele

Ak chcete skutočne niečo vyriešiť, musíte poskytnúť reálne rozmiestnenie dát, reálneho formátu a všetkého ostatného. Ak máte firemné citlivé dáta, ta ich zmente, ale zachovajte rozloženie a formát. A ukážte na prílohe s dátami 2 veci. 1. to čo máte, a 2. kľudne na druhom liste to, čo chcete mať. Musíme vidieť odkiaľ beriete tie filtrované dáta, odkiaľ pokiaľ je filter (šírka, výška), aký typ dát obsahuje filtrovaný stĺpec, aký typ dát majú tie vyberané hodnoty ...

Ako viacnásobné kritérium musí byť horizontálne pole stringov.
...

Zaregistrujte sa, a vložte prílohu s príkladom toho čo máte, a čo chcete mať. To si tu má človek všetko stále vytvárať a vymýšľať sám ?
Príklad ovládania filtra, kde ako vstupné hodnoty môže slúžiť niekoľkonásobná nesúvislá oblasť, akurát (keďže nemáme reálnu prílohu) netuším, načo by ste niečo také potreboval...

Príloha s príkladom je kde ?
Mňa zatiaľ napadá len ťažkopádny vzorec.

Nerozumiem čo chcete. Ak nemáte na každom liste nastavenú hlavičku, tak toto nastaví rovnakú hlavičku pre všetky listy, ktoré sa majú tlačiť.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim WS As Worksheet
For Each WS In ThisWorkbook.Windows(1).SelectedSheets
WS.PageSetup.RightHeader = "&P/&N"
Next WS
Set WS = Nothing
End Sub
Teda príklad:
Označím na tlač Hárok1 a Hárok3 (Hárok2 vynechám), dám tlačiť. Pred samotnou tlačou pri náhľade ešte niesú hlavičky nastavené (záleží na konkrétnom používaní súboru). Nastaví sa to až pri stlačení čudlíku na tlačenie.
Na Hárku1 mám 1 tlačiteľnú stranu, na Hárku3 mám 3 tlačiteľné strany. Číslovanie strán vo výsledku bude.
1. strana Hárku1 - 1/4
1. strana Hárku3 - 2/4
2. strana Hárku3 - 3/4
3. strana Hárku3 - 4/4

Ak by sa Vám počet listov nemal meniť, a stále máte tie isté listy, len meníte obsah a rozsah, tak si označte všetky listy, nastavte im hlavičku ako bolo písané, a to minimakro nepotrebujete. Takto to funguje na E2016.

Ak chcete niečo iné, vložte aj prílohu, lebo teda aspoň ja fakt netuším čo iné by ste mohol chcieť ...

V bunke bude text:
="Zapsal dne: "&TEXT(TODAY();"d.m.yyyy")
="Zapsal dne: "&HODNOTA.NA.TEXT(DNES();"d.m.rrrr")

V bunke bude číslo (klasický dátum)
=TODAY()
=DNES()
+ Vlastný formát bunky
"Zapsal dne: "d.m.yyyy

Napr.

V G by ste mal obaliť vzorec do
=IF(D18="";""; vzorec )
v H obalit do
=IF(OR(E18="";F18="");""; vzorec )
v L obaliť do
=IF(OR(E18="";F18="");""; vzorec )

Na liste Země:
v F2 dať napr.
=$F2/3
v G2 napr.
=$F2/3*2
v H2 napr.
=$F2
Vzorce potiahnutím skopírovať až dole.
A ejhľa, hneď máte iné výsledky. A vyvstanú iné problémy - zaokrúhľovanie. Aj v Země, aj prehľade, či celkových súčtoch v Business trip abroad.

Čo riešite v M,N,O,S,T ? V "S" dokonca ani nieje E27 a E19 vzorec. "T" sa ničím nemení.

Pravdepodobne "lze", ale musíte tú tbl poskytnúť do pľacu ...
Nehlási Vám to cyklické odkazy, alebo iné chyby ?
Čo výpočty, sedia ?
Je to prepojené na iné súbory ? Ak áno je to na sieti ?
...

?
- nikto nesmie mať súbor otvorený.
- zobrazte na sieťovom úložisku skryté súbory
- zmažte prípadné skryté kópie súboru

U mňa (E2016 Pro SK x64, Win10) to funguje správne. Každý list kontroluje svoju oblasť G2, a volá makro s parametrom, ktorým je ten daný list. A na ten daný list sa pripíšu hodnoty. Funguje to aj samostatne pri obnovení jednotlivých dotazov, aj hromadne pri obnovení všetkého, aj pri manuálnom Ctrl+d spustení na ktoromkoľvek liste, aj pri naplánovanom načasovanom spustení každú minútu. Nikam ma neprehadzuje. Netuším ako Vám ešte pomôcť. Keď u mňa všetko ide. Napadá ma presunúť toto funkčné univerzálne makro do každého listu zvlášť, a volať tam ten daný list. Podľa mňa je to zbytočná práca.

Akurát medzi PowerQuery dotazmi je zbytočný "Bittrex (2)" - zmazať. A neviem na čo je "Coinmarket_Cap", ak je tiež zbytočný - zmazať.

Skúste to čo som postoval tu, teda:
Nastaviť v Možnostiach KT na karte Údaje voľbu "Počet zachovaných položiek v jednom poli" na "Žiadne" a Refresh + Uložiť. Potom skúste nastaviť na Automaticky, a zase Refresh.

Netuším, skúste ešte nastaviť v Možnostiach KT na karte Údaje voľbu "Počet zachovaných položiek v jednom poli" na "Žiadne", a Refresh. Ale to je na výmaz položiek filtra ... tak neviem.

EDIT: Nedarí sa mi nasimulovať taký stav, že by mi to nešlo pomocou toho 1. postupu. Len uprostred to dajte uložiť, a na konci to dajte uložiť.

Skúste:
-V zozname polí v návrhu KT odznačte pole "č.artiklu". Zmizne z KT.
-Na karte Analyzovať dajte Obnoviť.
-V zozname polí v návrhu KT znovu označte pole "č.artiklu". objaví sa v KT.
-Na karte Analyzovať dajte znovu Obnoviť.

EDIT:
Prípadne:
-V Možnostiach KT na karte Údaje odškrtnúť "Uložiť zdrojové dáta so súborom".
-Uložiť súbor (skúste na kópii súboru, nie na origo)
-Zatvoriť Excel.
-Otvoriť súbor.
-Na karte Analyzovať dajte Obnoviť.
-V Možnostiach KT na karte Údaje zaškrtnúť "Uložiť zdrojové dáta so súborom".
-Uložiť súbor.

Je to len pokus, no ...

No, tak potom asi takto:
-Makro sa dá volať z každého listu Ctrl+d manuálne, alebo z každého v ktorom je odchyt zmeny v G2 (viď Worksheet_Change) automaticky.
-Makro musí byť univerzálne, aby bolo použiteľné pre všetky listy neznámych názvov, a pre neznáme názvy tabuliek.
-Nastavil som to tak, že Tabuľky v listoch MUSIA začínať v A1 a A4, a musia mať rovnaký počet stĺpcov ako je teraz (inak treba zmeniť v makre indexy).
-Doplnil som vzorce na výpočet reálnych dátumov a časov (nie len text).
-Ošetril som vkladanie na správny riadok, v prípade zmazania dát v Tabuľke bez zmazania riadkov Tabuľky, rozšírenie Tabuľky, aj pridanie vzorcov ak nie sú.

Teraz to skúšam na Vašom súbore a funguje to. Pod článkom sú 2 komenty, a v jednom z nich je oprava jedného riadku kódu. Ja som si na mojej konfigurácii ešte v tom riadku zmenil číslo 5 na 7, lebo ustrihávalo kúsok posl. znaku. Určite to funguje. Mám E2016. Ak nerozumiete tomu zrozumiteľnému návodu (nemusíte rozumieť kódu), tak si dajte stránku preložiť cez translátor.

EDIT: Tu máte integráciu do Vašeho súboru. Pozor upravil a použil som iba Right metódu. Ostatné si treba upraviť rovnako ten spomínaný riadok pod návodom.

Příspěvky uživatele

Uživatelské menu

Menu

Formulář Faktura

Formulář Faktura IV

Helios iNuvio

On-line nástroje