MS Excel

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: « předchozí 1 2 3 další »

camron(21.1.2021 11:12)#049534

ondrejmalik napsal/a:

elninoslov napsal/a: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: 49531_kw.zip (79kB, staženo 1x)

Zdě je příklad zdrojových dat
A toto je dost šikovné, jednotlivé listy dle KW, a pak klikačka, ale ještě ten prvotní zdroj problému jak pak data automaticky řadit třeba i v dalším listu, když makro nebude opět reagovat na změnu.

Příloha: xlsx

49534_zdrojova-data.xlsx (146kB, staženo 10x)

citovat

elninoslov(21.1.2021 12:19)#049535

Nič nikam nekopírujte. Urobte z programu Export do toho súboru, je jedno za aké obdobie, za celý rok, to je fuk. Dajte aktualizovať všetko na karte Údaje. To je celé. Rok, týždeň, typy vád a čo ja viem čo si ľahko vyfiltrujete rýchlymi filtrami, a zoradenie ide od najväčšieho.

Příloha: zip

49535_kw.zip (127kB, staženo 9x)

citovat

AndrejB(21.1.2021 14:27)#049540

ondrejmalik napsal/a:

AndrejB napsal/a:
Ako by to mohlo vypadat tu:
https://uloz.to/file/5YSDALEzcSMh/data-1-xlsm

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.[/quote]

KW si vytvorite jednoducho =ISOWEEKNUM(Datum)
Robite to prilis zlozito asi. Ale Elninoslov Vam dal komplet v Power Query, ak mate kazdy tyzden exportovane chyby do samostatneho suboru, tak Vam staci si ich vkladat do spravnej zlozky, ono sa to uz postara o vsetko co ma...citovat

elninoslov(21.1.2021 15:52)#049545

@ondrejmalik : Asi hovoríme jeden o voze a druhý o koze.
-Potrebujete si pozrieť, v ktorom týždni bolo koľko chýb nejakého druhu na vybraných linkách.
-Potrebujete nielen za posledný týždeň, ale aj retrospektívne.

-Ten Váš obslužný SW, exportuje plne automaticky, každý pondelok o 00:00:01 vyexportuje dáta za minulý týždeň, a fetrik ? Viac sa s Vami nebaví?
-Tieto dáta ten SW exportuje iba na Váš podnet, kedy si Vy zamaniete?
-Dá sa zmeniť rozsah dátumov exportovaných dát v tom SW? Napr. od dnes rok dozadu?
-Aký súbor presne ten SW poskytne? TXT, CSV, XML, XLS, DAT ... ? Môžete takýto súbor postnúť bez akejkoľvek úpravy?
-Tento súbor z toho SW je vždy ten istý súbor na disku? Teda napr. "C:\Users\Fero Mrkva\Desktop\SW\Export.xls"?
-Alebo každý export (vynútený/automatický) sa ukladá pod samostatným jedinečným menom? Napr. "Export_2021_01_18_00:00:01.xls"?

Ja totiž hovorím o prípade, že Vy máte Excel nakŕmiť priamo tým súborom/súbormi z exportu toho SW. Nie to komplikovane kopírovať a filtrovať a zoraďovať ... To môže urobiť PQ na pozadí.citovat

camron(22.1.2021 7:19)#049552

elninoslov napsal/a:

@ondrejmalik : Asi hovoríme jeden o voze a druhý o koze.
-Potrebujete si pozrieť, v ktorom týždni bolo koľko chýb nejakého druhu na vybraných linkách.
-Potrebujete nielen za posledný týždeň, ale aj retrospektívne.

-Ten Váš obslužný SW, exportuje plne automaticky, každý pondelok o 00:00:01 vyexportuje dáta za minulý týždeň, a fetrik ? Viac sa s Vami nebaví?
-Tieto dáta ten SW exportuje iba na Váš podnet, kedy si Vy zamaniete?
-Dá sa zmeniť rozsah dátumov exportovaných dát v tom SW? Napr. od dnes rok dozadu?
-Aký súbor presne ten SW poskytne? TXT, CSV, XML, XLS, DAT ... ? Môžete takýto súbor postnúť bez akejkoľvek úpravy?
-Tento súbor z toho SW je vždy ten istý súbor na disku? Teda napr. "C:\Users\Fero Mrkva\Desktop\SW\Export.xls"?
-Alebo každý export (vynútený/automatický) sa ukladá pod samostatným jedinečným menom? Napr. "Export_2021_01_18_00:00:01.xls"?

Ja totiž hovorím o prípade, že Vy máte Excel nakŕmiť priamo tým súborom/súbormi z exportu toho SW. Nie to komplikovane kopírovať a filtrovať a zoraďovať ... To môže urobiť PQ na pozadí.

Data z SW si musím tahat sám, zadávám datum od - do, analýza chyb bude probíhat každý týden, tzn. v pondělí stáhnu data a uložím někam na disk. SW exportuje do .xlsx a neukládá, ukládám já na různé místo na disku. Tento soubor zatím vždy musím rozdělovat do vedlejších buněk, protože v sloupci text. dokladu č. 1 ( to je typ vady) jsou 3 různé atributy - typ vady -(1-3), kód vady, a popis vady.

Soubor mohu uložit kamkoliv, pod jakýmkoliv názvem.

V příloze neupravená data

Příloha: xlsx

49552_zdrojova-data.xlsx (59kB, staženo 10x)

citovat

elninoslov(22.1.2021 8:34)#049553

No dobre. Do rôznych zložiek ? Myslíte takto:
11.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "E:\Download\Excel\KW exporty\"
18.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "D:\Dokumenty\"

alebo takto ?
11.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "D:\Dokumenty\KW exporty\KW3\"
18.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "D:\Dokumenty\KW exporty\KW4\"

Následne si potrebujete pozrieť napr. 20.1 aj analýzu dát stiahnutých 11.1?

Ten SW neuchováva dáta dlhšie ako 1 týždeň?

Môj návrh je:
- ak SW neuchováva dáta dlhšie ako týždeň, exportovať ich pod názvom s dátumom do stále rovnakej zložky. Napr. do zložky "D:\Exporty\" uložíme
11.1 súbor "zdrojova-data-2021.01.11.xlsx"
18.1 súbor "zdrojova-data-2021.01.18.xlsx"
- ak SW uchováva celú potrebnú históriu (nemyslím 10 rokov), tak Exportujte vždy celú históriu do stále rovnakého jedného súboru "zdrojova-data.xlsx" v rovnakej zložke napr. "D:\Export\", teda
11.1 súbor "D:\Export\"zdrojova-data.xlsx"
18.1 súbor "D:\Export\"zdrojova-data.xlsx"

Mätie ma to rôzne miesto na disku "ukládám já na různé místo na disku".

Inak v tom nevidím problém, ako ste si mohli všimnúť v predošlých príkladoch.

Upresnite ešte tieto veci, a poriešime to. Takže môže byť ten PowerQuery (Excel 2010 a vyšší)?citovat

AndrejB(22.1.2021 8:39)#049554

ondrejmalik napsal/a:

Soubor mohu uložit kamkoliv, pod jakýmkoliv názvem.

V příloze neupravená dataPříloha: 49552_zdrojova-data.xlsx (59kB, staženo 2x)

Staci pridavat do tabulky nove udaje a auitomaticky sa vam to aktualizuje... Skuste si to pozriet, ci to takto staci.

https://ulozto.cz/tamhle/7dAMY1X0ek9Tcitovat

camron(22.1.2021 8:53)#049556

elninoslov napsal/a:

No dobre. Do rôznych zložiek ? Myslíte takto:
11.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "E:\Download\Excel\KW exporty\"
18.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "D:\Dokumenty\"

alebo takto ?
11.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "D:\Dokumenty\KW exporty\KW3\"
18.1 exportujete súbor s názvom "zdrojova-data.xlsx" do zložky "D:\Dokumenty\KW exporty\KW4\"

Následne si potrebujete pozrieť napr. 20.1 aj analýzu dát stiahnutých 11.1?

Ten SW neuchováva dáta dlhšie ako 1 týždeň?

Môj návrh je:
- ak SW neuchováva dáta dlhšie ako týždeň, exportovať ich pod názvom s dátumom do stále rovnakej zložky. Napr. do zložky "D:\Exporty\" uložíme
11.1 súbor "zdrojova-data-2021.01.11.xlsx"
18.1 súbor "zdrojova-data-2021.01.18.xlsx"
- ak SW uchováva celú potrebnú históriu (nemyslím 10 rokov), tak Exportujte vždy celú históriu do stále rovnakého jedného súboru "zdrojova-data.xlsx" v rovnakej zložke napr. "D:\Export\", teda
11.1 súbor "D:\Export\"zdrojova-data.xlsx"
18.1 súbor "D:\Export\"zdrojova-data.xlsx"

Mätie ma to rôzne miesto na disku "ukládám já na různé místo na disku".

Inak v tom nevidím problém, ako ste si mohli všimnúť v predošlých príkladoch.

Upresnite ešte tieto veci, a poriešime to. Takže môže byť ten PowerQuery (Excel 2010 a vyšší)?

Špatně jsem formuloval, mohu si vytvořit adresář a ukládat to pouze do jednoho.
Přesně tak, potřebuji ukládat KW1-53 tak abych se mohl zpětně podívat na různé týdny.

SW umí zpětně rok a více, od doby kdy do SW byl přidán tento modul.

Může být Excel PQ 2010 a výšší...

Díky za pomoc

citovat

camron(22.1.2021 8:58)#049557

AndrejB napsal/a:

ondrejmalik napsal/a:

Soubor mohu uložit kamkoliv, pod jakýmkoliv názvem.

V příloze neupravená dataPříloha: 49552_zdrojova-data.xlsx (59kB, staženo 2x)

Staci pridavat do tabulky nove udaje a auitomaticky sa vam to aktualizuje... Skuste si to pozriet, ci to takto staci.

https://ulozto.cz/tamhle/7dAMY1X0ek9T

Super! Děkuji, Zkusím se s tím ještě pohrát tak abych KW1-53 ukládal do jednotlivých souborů a pak PQ tahalo data ze složky

citovat

camron(22.1.2021 9:06)#049559

AndrejB napsal/a:

ondrejmalik napsal/a:

Soubor mohu uložit kamkoliv, pod jakýmkoliv názvem.

V příloze neupravená dataPříloha: 49552_zdrojova-data.xlsx (59kB, staženo 2x)

Staci pridavat do tabulky nove udaje a auitomaticky sa vam to aktualizuje... Skuste si to pozriet, ci to takto staci.

https://ulozto.cz/tamhle/7dAMY1X0ek9T

Ještě dotaz, proč ve sloupci KW se zobrazuje týden 3, když dle datumů je to týden 2.citovat

Strana: « předchozí 1 2 3 další »

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

Uživatelské menu

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Aktivní diskuse

Čas od do

Makro smyčka

Makro smyčka

Čas od do

Čas od do

Čas od do

Čas od do