< návrat zpět

MS Excel


Téma: řazení dat - Makro nereaguje změnu v daném listu rss

Zaslal/a 21.1.2021 7:01

Dobrý den prosím o pomoc s Makrem,

Vytvořil jsem Makro viz níže

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

On Error Resume Next
If Not Intersect(Target, Range("B:B")) Is Nothing Then
Range("B4").Sort Key1:=Range("B5"), _
Order1:=xlDescending, Header:=xlYes, _
OrderCustom:=1, MatchCase:=False, _
Orientation:=xlTopToBottom
End If

End Sub

Makro je použité na automatické řazení dat ve sloupci B:B v listu 1. Ve sloupci B- jsou vzorce které odkazují na buňky v druhých listech, pokud v druhých listech změním data, tak automatické řazení v listu 1 neproběhne. Proběhne až prokliknu vzorec v ketrékoliv buňce. Makro nereaguje na změny v ostatních listech.

Dokázal by někdo pomoci?

Díky

Zaslat odpověď >

Strana:  1 2 3   další »
#049521
elninoslov
Lebo OnChange zachytí iba zmenu od užívateľa, nie zmenu vzorcom. Dá sa použiť OnCalculate, ale to bude spúšťané vždy pri akejkoľvek zmene (lebo každá vyvolá prepočet).

OnChange by fungoval, tak ako popisujete iba, ak by ste ho použil vo všetkých listoch, ktoré ovplyvňujú vzorce v liste, ktorý chcete filtrovať.

Dajte prílohu, ako to u Vás vyzerá, a popis čo potrebujete urobiť, ako sa to používa.citovat
#049522
avatar
Díky,

V příloze soubor s popisky.

Akorát nelze uložit ve formátu s podporou maker.citovat
#049523
elninoslov
XLSM musíte zabaliť do ZIP, aby sa dal nahrať.citovat
#049524
avatar
OK, viz příloha
Příloha: zip49524_data-1.zip (93kB, staženo 3x)
citovat
#049525
elninoslov
Hmm, a nebolo by lepšie, keby sa cez PowerQuery naťahovali dáta rovno z tých súborov do dátového modelu, a ten by ste iba filtroval cez KT? A nevytváral by ste X listov a nekopíroval data z X súborov do nich. V zmene nejakých dát v niektorom zo zdrojových súborov, by ste iba klikol na Aktualizovať všetko, a PQ by sa aktualizoval. Žiadne makro.
Na toto je superexpert mepexg.citovat
#049526
avatar

ondrejmalik napsal/a:

OK, viz přílohaPříloha: 49524_data-1.zip (93kB, staženo 2x)


Urcite si dajte vsetko do jednej tabulky, kazdy zaznam do riadku. Datum, chyba, popis.. Data si zobrazujte ako Pivot tabulku. Tam si mozete dat zobrazit podla dna, tyznda, mesiac, rok.. Uplne jednoducho.. Mate zbytocne takto problemy.citovat
#049527
avatar
Nemám představu jak bych tvořil.
Nevím zda je to problém, ale mě se to tak jeví. Zdroj dat pro KW 1-53 je program, ze kterého vytahuji a exportuji data pro daný týden. Tyto data nejsou filtrovány (potřebuji jen své typy vad), jsou rozděleny do dnů duplikovány a nejsou sečteny na typ vady, vytvářím právě kontingenční tabulku pro daný týden a tyto data pak kopíruji do jednotlivých listů KW1 - KW53. Ve finále je to jednoduchý postup.
Z programu vytáhnou data, vytvořit kontingenční tabulku, zkopírovat data, vložit do KW1, a pak řadit v listu grafy.
Mám v plánu takto řadit každou vadu do TOP 5, a zobrazovat přes vzorec KDYŽ pro daný týden v buňce "I1", následně tvořit různé grafy...citovat
#049529
avatar

ondrejmalik napsal/a:

Nemám představu jak bych tvořil.
Nevím zda je to problém, ale mě se to tak jeví. Zdroj dat pro KW 1-53 je program, ze kterého vytahuji a exportuji data pro daný týden. Tyto data nejsou filtrovány (potřebuji jen své typy vad), jsou rozděleny do dnů duplikovány a nejsou sečteny na typ vady, vytvářím právě kontingenční tabulku pro daný týden a tyto data pak kopíruji do jednotlivých listů KW1 - KW53. Ve finále je to jednoduchý postup.
Z programu vytáhnou data, vytvořit kontingenční tabulku, zkopírovat data, vložit do KW1, a pak řadit v listu grafy.
Mám v plánu takto řadit každou vadu do TOP 5, a zobrazovat přes vzorec KDYŽ pro daný týden v buňce "I1", následně tvořit různé grafy...


Ako by to mohlo vypadat tu:
https://uloz.to/file/5YSDALEzcSMh/data-1-xlsmcitovat
#049530
avatar
AndrejB napsal/a:
Ako by to mohlo vypadat tu:
https://uloz.to/file/5YSDALEzcSMh/data-1-xlsm[/quote]

Potřebuji daný rozsah od PO-Neděle - takže data potřebuji rozděleny na KW1 - KW 53, tudíž nezobrazované po dnech ale součet za týden pro danou vadu. Pivot tabulka bude jen další tabulka ze které budu zaškrtávat různé datumy a pak abych měl součet pro daný výrobek budu muset vytvořit kontingenční tabulku. A jsem tam de jsem byl, budu potřebovat histori KW1-KW53, tak znovu kopírovat data do jednotlivých listů KW1-KW53.citovat
#049531
elninoslov
Niektoré veci sa dajú jednoducho naklikať. Ten SW Vám exportuje do samostatných súborov?
Ak áno tak majú určite rovnakú štruktúru. Tu je príklad PQ.

Ak sú v exportoch aj iné vady, ako tie, ktoré potrebujete, treba ich uviesť, a urobí sa v PQ na to filter.
Tiež sa mi zdá, že to robíte to komplikovane. Alebo sa nechápeme.
Příloha: zip49531_kw.zip (79kB, staženo 4x)
citovat

Strana:  1 2 3   další »

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura III

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

Aktivní diskuse

Seznam hodnot

elninoslov • 3.3. 15:25

Automat.vyplnění formuláře daty z Excelu

mullekri • 3.3. 14:23

Automat.vyplnění formuláře daty z Excelu

Rejpal • 3.3. 13:47

Automat.vyplnění formuláře daty z Excelu

mullekri • 3.3. 13:12

Automat.vyplnění formuláře daty z Excelu

mullekri • 3.3. 13:09

Automat.vyplnění formuláře daty z Excelu

mullekri • 3.3. 13:08

Seznam hodnot

pavelo • 3.3. 11:43