- iPhone topik
- Apple Watch
- A hagyományos (nem okos-) telefonok jelene és jövője
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Fotók, videók mobillal
- Samsung Galaxy Watch (Tizen és Wear OS) ingyenes számlapok, kupon kódok
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Android alkalmazások - szoftver kibeszélő topik
- VoLTE/VoWiFi
- Samsung Galaxy S23 és S23+ - ami belül van, az számít igazán
-
Mobilarena
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
-
-
-
Mutt
senior tag
válasz
PeLa87
#42228
üzenetére
Szia,
... a főlapom, meg lehetne valahogy jeleníteni, hogy azon a napon van-e valakinek születésnapja?
Makró és segédoszlop nélkül az Excel 2010-től használható Power Query tud megoldás lenni.
Magyar olimpikonok listájából csináltam egy ilyen fájlt:
Van benne egy Fő lap és 12 hónap adatát tartalmazó lap, amelyen vannak az adatok (azonos fejléccel és azonos sorrenddel). Ezek után jöhet a Power Query.
1. Adatok fülön -> Adatok beolvasása -> Fájlból
2. Kiválasztod a fájlt ami tartalmazza az adatokat.
3. Jobb klikk a fájlnéven (esetemben Olimpikonok.xlsx) és Szerkesztés
4. Első lépésként szűréssel zárjuk ki az első lapot, ahova az eredményt akarjuk megjeleníteni. Esetemben a Fő nevű munkalapot dobjuk.
5. Csak a Data oszlopra lesz szükségünk, ezt jelöld ki és a fejlécen jobb klikk után a többi oszlop tőrlése kell.
6. A megmaradt oszlop jobb felső sarkába kattints és válaszd a kibontást.
7. Hozzunk létre egy normális fejlécet, erre a legegyszerűbb megoldás az Átalakítás -> Első sor használata fejlcéként.
8. Mivel minden lapon volt fejlécünk ezért az adatok között nem csak a neveket/dátumokat, hanem a többi lapon ismétlődő fejléceket is látjuk ezt szűréssel vegyük ki.
9. Érdemes a megmaradt oszlopok formátumát beállítani. A születési dátum legyen tényleg dátum, a kor pedig szám. Jelöld ki az oszlopot és az Átalakítás fülön válaszd ki a megfelelő Adattípust. pl. születési dátumhoz a dátum legyen.
10. Kell egy új oszlop, amelybe megnézzük hogy melyik dátum napja azonos az aktuális nappal.
Oszlop hozzáadása -> Egyéni oszlopot használd. A képlet pedig ez legyen:=Date.Day([Születési Idő])=Date.Day(DateTime.LocalNow())
11. Ebben az oszlopban a TRUE értékekre szürjél rá.
12. Utánna törölhet jobb klikkel ez az oszlop.
13. Kezdőlap -> Bezárás és betöltés -> .. adott helyre opció kell.
14. Válaszd a Kimutatás opciót és a fő lapot. Tervezd meg a Kimutatásodat ahogy neked tetszik.
15. A kimutatás beállításainál válaszd az automatikus frissítést megnyitáskort.
üdv
-
Fferi50
Topikgazda
válasz
PeLa87
#42228
üzenetére
Szia!
Makró nélkül is megy, ha minden hónapba beteszel egy segédoszlopot. A képlet attól függ még, hogy a hónapok neve milyen módon szerepel.
Feltételeztem, hogy a hónapok teljes neve a lapok neve is. Ha nem így van, azt hiszem át tudod nevezni. A rövidített nevekkel ennél bonyolultabb a képlet.
Továbbá azt feltételeztem, hogy a nevek az A, a születési dátumok a B, az életkor a C oszlopban van. A segédoszlopot az E oszlopba tettem minden munkalapon.
A fő lapon az első sor lehet fejléc.
Akkor az A2 cella képlete (az első születésnapos neve):=INDEX(INDIREKT(SZÖVEG(MA();"hhhh") &"!A1:C100");HOL.VAN(NAP(MA());INDIREKT(SZÖVEG(MA();"hhhh") & "!E1:E100");0);1)
A B2 cella képlete (az életkora):=INDEX(INDIREKT(SZÖVEG(MA();"hhhh") &"!A1:C100");HOL.VAN(NAP(MA());INDIREKT(SZÖVEG(MA();"hhhh") & "!E1:E100");0);1)
Az A3 cella képlete (a következő születésnapos neve):=INDEX(INDIREKT(SZÖVEG(MA();"hhhh") &"!A1:C100");HOL.VAN(A2;INDIREKT(SZÖVEG(MA();"hhhh") & "!A1:A100");0)+1;1)A B3 cella képlete (a következő születésnapos életkora):
=INDEX(INDIREKT(SZÖVEG(MA();"hhhh") &"!A1:C100");HOL.VAN(A2;INDIREKT(SZÖVEG(MA();"hhhh") & "!A1:A100");0)+1;3)
Ez a két képlet húzható lefelé. Amennyiben már nincs több születésnapos, akkor Hibaértéket fogsz kapni. Ennek elkerülésére az egészet beágyazhatod egy HAHIBA függvénybe.
Akkor is hibát kapsz az első sorba, ha nincs születésnapos, szintén HAHIBA függvénnyel kezelhető, hogy pl. azt írja ki, hogy nincs születésnapos ma.
A hibakezeléseket rád bízom.
A MA() függvények "köszönhetően" minden nap aktuális lesz az érték.Üdv.
-
-
-
sztanozs
veterán
válasz
PeLa87
#35312
üzenetére
Másolás, beillesztés, egyedi szűrése
Vagy pedig a következő módon worksheet függvényekkel és/vagy VBA-val: [link]Függvény az egyedi cégnevek előállítására:
=IFERROR(INDEX(Sheet1!$A$1:$A$18, MATCH(0,COUNTIF(INDIRECT("R1C:R[-1]C",FALSE), Sheet1!$A$1:$A$18), 0)),"")1) Sheet1!$A$1:$A$18 - ezt kell cserélni arra az sheet/oszlopra, amiben az 1.es munkalapon a cégnevek vannak
2) a 2-es munkalapon a leszűrt cégnevek tábla első adat sorába, Pl A2 (fejléc kötelező, ami nem egyezik egyik cégnévvel sem) bemásolni a fenti képletet
3) Array formulaként bevinni (SHIFT+CRTL+ENTER)
4) Minimum annyi sorra lehúzni, amennyi cég lehet (de lehúzható akár 100-200 sorra is, az utolsó egyedi érték után üres mezők lesznek
5) a 2-es munkalap következő oszlopának első adatmezőbe ezt beilleszteni és lehúzni:=IF(INDIRECT("RC[-1]",FALSE)<>"",SUMIF(Sheet1!A:A, INDIRECT("RC[-1]",FALSE),Sheet1!B:B),"")
- INDIRECT("RC[-1]",FALSE) - opcionálisan cserélhető a bal oldali elemre való hivatkozással (B2-be a függvényt beírva A2-re)
- Sheet1!A:A - 1-es munkalapon a cégnév oszlop
- Sheet1!B:B - 1-es munkalapon a összeg oszlop -
-
Delila_1
veterán
válasz
PeLa87
#31822
üzenetére
Feltettem a ide a füzetedet.
Az A oszlop a név, a B ennek az angol karakteres megfelelője + egy hozzá fűzött alsó kötjel + 5 db véletlen karakter. A harmadik oszlopban a B oszlop bárkódja. Ehhez csak annyi kell, hogy a B oszlopra hivatkozva hozd be a nevet, és egy bárkód típusú karakterkészletet rendelj hozzá. Az én füzetemben a "3 of 9 Barcode" nevű van.
A második oszlop adatait egy saját, Karaktercsere nevű függvény állítja elő. Ebben az oszlopban véletlen-szerűen előállított karakterek vannak. Hogy megmaradjon az egyes nevekhez rendelt pár karakter, a cellát másold, és saját magára adj értékbeillesztést.
![;]](http://cdn.rios.hu/dl/s/v1.gif)
Új hozzászólás Aktív témák
Hirdetés
Fferi50
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Sea of Thieves Premium Edition és Egyéb Játékkulcsok.
- Vírusirtó, Antivirus, VPN kulcsok
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Eladó steam/ubisoft/EA/stb. kulcsok Bank/Revolut/Wise (EUR, USD, crypto OK)
- GYÁRI TÖLTŐK DELL LENOVO HP FUJITSU TOSHIBA Macbook---------- Budapest,/MPL/Foxpost
- BESZÁMÍTÁS! ASUS A520M R5 5600X 16GB DDR4 512GB SSD RTX 3060Ti 8GB Rampage SHIVA Enermax 650W
- Alkatrészt cserélnél vagy bővítenél? Nálunk van, ami kell! Enterprise alkatrészek ITT
- TP-Link Archer C1200 Router eladó (1200 Mb/s Wi-Fi)
- VÉGKIÁRUSÍTÁS - REFURBISHED - Lenovo ThinkPad 40AC Thunderbolt 3 docking station
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: PC Trade Systems Kft.
Város: Szeged