-
Fototrend
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Gh0sT
addikt
Nah, megnéztem.. működik
Tegyük fel a következőt:
Az A oszlop tartalmazza a dátumokat
A B a cég neveket
A C a nemtom miket
Fogod magad és csinálsz egy autó szűrőt. Adatok --> autó szűrő
Ezután Adatok --> részösszegek
Csoportosítási alap: B oszlop fejléce (mondjuk cégnév)
Melyik függvénnyel: darab
Összegzendő oszlopok: B oszlop fejléce
OK
Eztán fent az A oszlopon klikkelsz a szűrő nyilacskájára és az egyéni szűrést választod. Itt beállítod a feltételeket a dátumra és kész...
Remélem valami hasonlóra gondoltál...Soha nem késő, hogy azzá válj, aki lehettél volna.
-
erdey_a
őstag
Na megjött a másik mélre.
Megnéztem, ilyesmi kellene, de hogyan lehetne ezt egy adott időszakra megcsinálni?
Mert a táblában amit küldtél az összes van szűrve, de nekem mondjuk csak az október haviak kellenek.
Illetve szükséges lenne az egész automatizálása. Tehát mondjuk kiválasztja az illető az adott időszakot és akkor egy másik lapon megjelennek a cégek és a kódok.
Tudom, sokat kérek, de fontos dolog.Vérboci
-
erdey_a
őstag
válasz erdey_a #1437 üzenetére
Na mégis jó lesz az FKERES, csak minden adatoszlop kiiratására külön kell egy.
Szóval megy. Köszi.
SZERK.: CSakhogy felmerült egy nem is kicsiny probléma.
A megjegyzés oszlopban hiperhivatkozások vannak az eredeti bizonylatok scannelt példányához. Az FKERES az elérési utat ki is írja, de az nem lesz hivatkozás, így rákattintani sem lehet. Na most mit tegyek? Nehogy már a célegyenesben bukjak el!
[Szerkesztve]Vérboci
-
Mutt
aktív tag
válasz erdey_a #51587 üzenetére
Szia,
... az eredeti táblázat nem módosítható bizonyos okokból, a kimutatáshoz azonban szükséges pár új adat.
A forrás táblázat csak dátumot tartalmaz, de a kimutatásnak heti alapon kell történnie.Kaptál már javaslatot, de szerintem van egyszerűbb megoldás is, ha Excel 2013 vagy frissebbet használsz.
PowerPivot-ot javaslok.Két módszert is mutatok, mindegyiknél az első lépés, hogy a jelenlegi adatot a Power Pivot adatmodellhez hozzá kell adni. Jelöld ki/állj az adatsoron Excelben majd Power Pivot menű (ha nincs ilyened akkor a Fejlesztő/Developer menüben a COM Add-ins alatt tudod aktiválni) és "Add Data to Model".
1. módszer
A betöltött adat végén az "Add column" oszlopba kattintva lehet ún. számított oszlopot / calculated column felvenni, ami minden soron végigmenve elvégzi a számítást, amit a táblázat feletti szerkesztőlécben lehet megadni. A formátum "oszlopnév := képlet". Ha a hét száma kell, akkor a WEEKNUM függvény kell. (Power Pivot DAX függvényeket használ, amelyek többsége hasonlít az Excel megfelelőjére, de a lényeg hogy ezek nem Excel függvények.Ha ez megvan, akkor már csak Kimutatás/Pivot kell de a forrásnak az adatmodell-t kell megadni.
Ezek után csak a frissítés gombot kell használni, az új oszlop az adatmodellben automatikusan tenni fogja a dolgát.
2. módszer
Érdemes egy dátumnaptárat létrehozni. Ehhez Excelben a legegyszerűbb megoldás, ha egy új lapon felsorold az összes napot (érdemes az év minden napját megadni, de nem kötelező) és betöltöd az adatmodellbe. Adj új oszlopokat hozzá, ami téged érdekel:
pl. hónap sorszámmal =MONTH(Table2[Dátum])
hónap rövidített névvel =FORMAT(Table2[Dátum];"mmm")
hónap teljes névvel =Format(Table2[Dátum];"mmmm")
negyedév =INT(([Month]+1)/4)+1 & "Q"Ezek után a Design fülön érdemes a naptárat megjelölni.
Ezek után kapcsoljuk össze a két táblát. Design menű és Manage relationship.
Menjünk vissza az Excelbe (File -> Close) és megint adatmodellből készítjük a kimutatást. Itt a dátummal kapcsolatos mezőket a dátumnaptárból tegyük a kimutatásba, a többi jön az eredeti adatsorból. Mivel a két tábla össze van kapcsolva az Excel a megfelelő szűrést fogja mindig elvégezni.
[ Szerkesztve ]
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
-
Delila_1
Topikgazda
válasz erdey_a #51741 üzenetére
Alt+F11-gyel belépsz a VBA szerkesztőbe. Bal oldalon kiválasztod a lapodat, a beállításoknál (Properties) a ScrollArea tulajdonságnál beállítod a területet, ahonnan nem akarsz kilépni.
A képen az A : D terület van megadva,Szerk.: sajnos ezt minden megnyitáskor újra be kell állítani, hacsak megnyitáshoz nem írsz egy rövid makrót, a ThisWorkbook laphoz rendelve. Ekkor makróbarátként kell mentened a füzetet.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Fferi50
őstag
válasz erdey_a #51741 üzenetére
Szia!
Esetleg próbáld meg Táblázattá alakítani a tartományodat:
Beleállsz a sorba - Beszúrás - Táblázat - gondolom fejléces.
A Fájl - Beállítások - Speciális részben az Adattartomány végén a formázás és a képletek folytatása négyzetet bejelölöd.
Sajnos a táblázat végén a Tab továbbra sem fog új sort nyitni, de ha elkezded a következő sort, akkor a képletek automatikusan "lehúzódnak".
Üdv. -
Delila_1
Topikgazda
válasz erdey_a #52066 üzenetére
Írtam egy kis makrót, ami elvégzi az adatokat tartalmazó oszlopok láthatóságát.
Modulba kell bemásolnod (lásd az összefoglalóban a leírását).Sub Frissites()
Dim oszlop As Integer
ActiveSheet.PivotTables("Kimutatás1").PivotCache.Refresh 'Itt a saját kimutatásod nevét
'írd a Kimutatás1 helyére
For oszlop = 2 To 14
If Application.WorksheetFunction.Sum(Columns(oszlop)) > 0 Then
Columns(oszlop).EntireColumn.Hidden = False
Else
Columns(oszlop).EntireColumn.Hidden = True
End If
Next
End Sub
A füzetet makróbarátként kell mentened.
A kimutatást tartalmazó lapra kitehetsz egy gombot, amihez hozzárendeled a Frissites makrót. Gombon jobb klikk, makró hozzárendelése.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Mutt
aktív tag
válasz erdey_a #52062 üzenetére
Szia,
Én sem biztos, hogy értem a problémát, de talán olyan kell amit most bemutatok (Excel 2010-től működik).
Illetve lenne még egy másik lehetőség, ami nagyon új. Kb 3 hetes és csak béta tesztelőknek érhető el.
PIVOTBY függvény használata. Még én sem próbáltam ki, de 2 éven belül inkább már az lesz a standard.Mutatom, hogy mostani Excel-el mit tudnál megcsinálni.
A képen bal oldalt az adatsor ami tartalmazza, hogy adott napon adott dologgal milyen eredmények voltak.
Ezt egy táblázatban tárolom, aminek a neve "Adatsor".
Mellette van egy legördülő lista, ahol az issue-k közül lehet választani. Ez is táblázatban van, aminek a neve "Oszlop".
Jobb oldalt pedig van egy Pivot, egész pontosan egy Power Pivot egy számított mezővel, aminek a neve Hiba.Ez a "Hiba" mindig a legördülő listának megfelelő értéket mutatja.
Lépések:
1. Adatsoron állva kimutatás beszúrásánál egy plusz lépés kell. Bepipálni az adatmodel-hez a hozzáadást.
2. Megcsinálod a pivotodat de az érték mezőhöz még nem adsz hozzá semmit.
3. Állj bele a másik táblába, ahol a legördülő listából lehet választani a kivánt értéket. Majd Power Pivot menűben az "Add to data model"-t válaszd. Ha nincs Power Pivot menűd, akkor Feljesztő/Developer menűben a COM-in bövitmények között engedélyezd. Zárd be a Power Pivot ablakot.
4. Most menj vissza a kimutatáshoz és jobb klikk a táblázat nevén (ami nálam Adatsor) és válaszd az új eredmény létrehozását.A felugró ablakban adsz neki egy nevet (nálam "Hiba") és kell egy képlet, ami ez:
=SUMX(CALCULATETABLE(Adatsor;INTERSECT(VALUES(Adatsor[Issue]);VALUES(Oszlop[Issue])));[Value])Ehhez egy kis súgó. A SUMX összegzi a megadott tábla adott oszlopát. A képlet végén található a [Value], ez az oszlop aminek az értékeit összeadja. Előtte pedig a CALCULATETABLE függvény segítségével állítjuk leszűrjük a teljes adatsort csak azon sorokra, ahol az "Issue" oszlopban azonos érték van, mint amit kiválasztottunk.
5. A frissen létrehozott "Hiba" eredményt add az érték mezőhöz.
Készen is vagy.Innentől csak válaszd ki a kivánt oszlopot és nyomj egy frissítést a kimutatáson.
üdv
A tanácsaimat ingyen adom. Ha nem tetszik, akkor kérlek ne kritizáld! / https://github.com/viszi/codes/tree/master/Excel
Új hozzászólás Aktív témák
- Windows 10, 11 Professional, Home, Enterprise licenckulcsok 64, 32 bit - MEGA Akció!
- Windows Server 2016, 2019, 2022 Standard, Datacenter, Essentials termékkulcsok - MEGA akció!
- Vírusirtó, Antivirus, VPN licenckulcsok - kedvezményes ajánlatok (frissítve: 2024. 05. 01.)
- Office Professional Plus 2013, 2016, 2019, 2021 RETAIL licenckulcsok - MEGA Akció!
- Windows 7 Home Premium, Pro, Ultimate és Windows 8, 8.1 Pro licenckulcsok 64, 32 bit - MEGA Akció!
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: Ozeki Kft.
Város: Debrecen