Kezdőlap › Fórumok › Excel témák › [Resolved] Dinamikus sorba rendezés szűrési feltétellel excel 2016-ban
- This topic has 10 hozzászólás, 3 résztvevő, and was last updated 3 years, 12 months telt el by EnergieLaczy.
-
SzerzőBejegyzés
-
2020-12-04-18:34 #8000
Sziasztok!
Segítséget szeretnék kérni a következő problémára.
Sajnos nem használható a SORBA.RENDEZ és SZŰRŐ függvény sem a 2016-os excelnél.
Dinamikus táblázat megoldása fogott most ki rajtam, hogy ne kelljen a szűrést mindig kézzel frissíteni.
“A” oszlopban a 250 féle hibakód. /Képen elrejtetem 15-től 248-ig, vannak közötte üres sorok is./
“B” oszlopban az előforduló hiba alkalom mennyisége az “A” oszlopban található hibánál
“C” oszlopban az okozott állásidő mennyisége az “A” oszlopban található hibánál.“C” oszlop szerint kellene fentről lefelé csökkenő állásidő sorrendbe állítani az “A” a “B” és “C” oszlopot is.
Képlet vagy VBA megoldás is érdekelne.
Előre is köszönöm a segítséget.
2020-12-04-18:35 #8001Első bejegyzéshez hiába csatoltam a képet, nem mutatja.
Attachments:
You must be logged in to view attached files.2020-12-04-18:55 #8005Szia!
Kicsit pontosítsunk, mit is szeretnél, illetve mi is a háttérben lévő adatszerkezet?
Az általad felvázolt táblázat egy összesítés eredménye, olyan mint egy PIVOT tábla. Vélelmezem, hogy ennek van egy adatforrása, ahol soronként van egy alkalom, és meg van adva, hogy miért és mennyit állt a valami.
Ez hogy keletkezik? Pivot, vagy darabha/szumha függvényekkel?Azt képzelem, hogy te azt szeretnéd, hogy ha az alap, rekord szintű táblába kerül(nek) adatok, akkor ez az összesítés frissüljön, és legyen is sorbarendezve összes állásidő szerint. Ha ez a helyzet, akkor kíváncsi vagyok, hogy kerülnek a táblába üres sorok.
Persze az is lehet, hogy ezt a tábla valahogy másként keletkezik, pl. Te írogatod kézzel, de ezen meglepődnék 🙂
Szóval elsőként ezt pontosítsuk.
Aztán pedig azt, hogy hogy képzeled a dinamikus frissítést?
Mikor frissüljön? Milyen esemény hatására frissüljön?Imre
2020-12-04-19:50 #8006Szia!
Üres sorok azért vannak a táblába, mert most még nem létező de később lehetséges kódok bővítése miatt jobb ha van tartalék sor.
Műszakonként 100 sor áll rendelkezésre beírni a hibakódot és mellé az okozott állásidőt és megjegyzést.
/Termelhető ízenként 10 sor állásidő. Ez is inkább ráhagyással van elkészítve./A hibakód alapján darabteli képlettel van összegezve a beírások száma adott kódnál.
A hibakód alapján szumha képlettel van összegezve a beírt állásidő mennyisége az adott kódnál.Ez a „Hetfo” fülön lévő táblázatban van összegezve, és ez van megkerestetve és átmásoltatva másik „NapiFrekiGrafik” fülre indirekt képlettel.
„E1″ cella = azzal a nappal amit ki szeretnénk választani hogy mutasson. Hetfo, Kedd, Szerda, Csutortok, stb..
Jelen esetben E1 cella hetfo csak fehér betűvel van.Tehát a NapiFrekiGrafik B2 cella =HAHIBA(INDIREKT($E$1&”!K552″);0) cellával, és így lefelé a 250 sor.
C2 cella =HAHIBA(INDIREKT($E$1&”!L552″);0) cellával, és így lefelé a 250 sor.Így nem kell mindegyik napnak-hétnek-hónapnak-évnek egy táblázatot csinálni külön, hanem az adott kiválasztott napét-hétét-haviét-éviét mutatná meg.
De naponta-hetente-havonta-évente változnak az állásidők összetétele, előfordulási alkalma és mennyisége.Majd a csoporvezetők fogják töltögetni a soron, ezért nem akartam a hetfo fülön hagyni a táblázatot, ne zavarja be őket.
Elég komplex lesz ha elkészül.
/Előforma kihozataltól kezdve állásidő kimutatás, termelt mennyiség kimutatás, vízesés diagram, frekvencia diagram, stb…/SAP marha drága, nekünk meg szükség van a pontosabb infókra.
SAP pl nem tudja kiírni a napi állásidő okok pontosabb megjegyzéseit, amit az összefűzéssel /és a könnyebb megoldásoddal!!!/ meg van oldva. Illetve ilyen frekvencia diagramot sem tud.Hát az lenne a legjobb, ha változik egy állásidő cella értéke, akkor egyből frissüljön.
De a mentés utáni, ki-be lépés nélküli frissítés is jobb opció, mint alkalmanként rendezés és szűrés / egyéni sorrend / ok végigjárása.Laci
2020-12-05-00:13 #8007Értem mit csinálsz. Nem ideális, de megteszi.
A lényeg most, hogy egyszerűen szeretnéd frissíteni a napifrekis munkalapon az A1-től kezdődő tartomány rendezettségét a C oszlop szerint.
Én a mentés eseményt javasolnám első körben.Itt a rendezés kódja:
Sub rendezes_frissitese() Sheets("NapiFrekiGrafik").Range("a1").currentregion.Sort _ key1:= Range("C1"), order1:=xlAscending, header:=xlyes End sub
Lépések
1. bemész a makró szerkesztőbe (Alt-F11)
2. Előveszed a Projekt ablakot ha nem látszik (Ctrl-R)
3. A bal oldali projekt ablakban megkeresed a munkafüzeted Thisworbook objektumát és duplát kattintasz rajta
4. A jobb oldali ablakban felül a „General”-t lenyitod és válaszd a Workbook-ot –> Megjelenik a Workbook_Open esemény
Ez is jó lehetne, de a mentés szerintem jobb
5. Mellette az Open-t lenyitod és választod a „BeforeSave” eseményt
6. A megjelenő Sub és End Sub közé bemásolod a fenti kód Sub és End Sub közötti részét
7. Teszteld
Változtass az adatokon, a táblában a C oszlop szerint megváltoznak az adatok, nyomj egy mentéstAkkor fog jól működni, ha az A1-re állva nyomsz egy Ctrl-A-t és ez kijelöli a teljes táblát, amit rendezni szeretnél.
Imre
2020-12-05-07:06 #8008Jó reggelt!
Feltétlenül eseményhez kell rendelni? Lehet egy gombot kitenni a lapra, és ahhoz rendelve indulna a modulba másolt makró.
Üdv,
Delila2020-12-07-11:49 #8013Bemásoltam a kódot, kijelöltem amit kell, Hetfo fülön változtattam.
Rámentettem Hetfo fülön, NapiFrekiGrafik fülön, nem történt semmi./Viszont…sajna csak 1 képet enged csatolni, ezért több részletbe írom le…/
Attachments:
You must be logged in to view attached files.2020-12-07-11:52 #8015Ha így másolom be a kódot, akkor rendezi.
Attachments:
You must be logged in to view attached files.2020-12-07-11:59 #8017Viszont Hetfo fülön mentéskor ezt írja ki, nem rendezi csak ha NapiFrekiGrafik fülön mentek.
NapiFrekiGrafik mentés után rendezi, viszont Hetfo fülön mentéskor mindig kiírja a hibát.
Legjobb az lenne ha nem csak NapiFrekiGrafik fülön mentés után rendezné, hanem bármelyik fül mentésekor.Attachments:
You must be logged in to view attached files.2020-12-07-12:07 #8019A
key1:=Range("C1")
részt változtasd meg.key1:=Sheets("NapiFrekiGrafik").Range("C1")
Imre
2020-12-07-12:30 #8020Tisztelt horvimi!
Szuperül szuperál! /Ez is!/ (:
Nagyon szépen köszönöm a segítséget és a megoldást!Üdvözlettel
Molnár László -
SzerzőBejegyzés
- Be kell jelentkezni a hozzászóláshoz.