Hirdetés

  2. Fórumok
  3. OS, alkalmazások
  4. Microsoft Excel topic
  5. (kiemelt téma)
  • Téma összefoglaló
    Utoljára frissítve: 2023-11-13 08:31

    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

  • #38971 Mutt senior tag kezdosql #38964
    Új Válasz #38971
    Új hozzászólás
    Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra
    Privát üzenet küldése

    Mutt

    senior tag

    válasz kezdosql #38964 üzenetére

    Szia,

    FFeri makrós megoldása mellett itt egy Power Query megoldás.

    1. Az adatsorod táblázatban legyen

    2. Excel-ben Adatok fülön Adatok beolvasása táblázatból megnyitja az adatsort Power Query szerkesztőben

    3. Töröld az automatikusan létrehozott típus módosítás lépést jobb oldalon lévő lépés-szerkesztőben

    4. A dátum oszlopot állítsuk át Dátum formátumra

    5. Most pedig vágjuk szét a cellákban található azonosítót és szöveget. Jelöld ki az első oszlopot, majd válaszd az Átalakítás -> Oszlop felosztása -> Karakterszám alapján

    Csak egyszer kell az első 4 karatker alapján szétvágni a szöveget:

    Az eredmény ez lesz:

    A.1 oszlopban lesz az azonosító és az A.2-ben a maradék szöveg.

    6. Az 5-ös lépést el kell végezned az összes oszlopon, vagyis következő oszlop kijelöl és oszlop felosztása karakterszám alapján.

    7. Megvan minden oszlopra az átalakítás.

    8. Jön egy furcsa lépés, az Unpivot. Jelöld ki csak a Dátum oszlopot, majd Átalakítás -> Többi oszlop elemi értékekre bontása

    Az eredmény ez lesz:

    9. Azt kell elérnünk, hogy az érték oszlopban az azonosítók egy másik oszlopba kerüljenek, ebben tud segíteni az hogy az attributum oszlop itt mindig ".1"-re végződik.
    Egy új oszlopot fogunk beszúrni, amibe az érték oszlop adatát csak akkor írjuk be, ha az attributum ".1"-re végződik. Oszlop hozzáadása -> Egyéni oszlop opció kell nekünk.

    10. Az egyéni oszlop képlete a fenti logika alapján ez lesz:
    = if Text.End([Attribútum],2) = ".1" then [Érték] else null

    11. Az eredmény megint nem tökéletes, mert pont ott nem látható az azonosító ahol az esemény történt.

    12. Ezt lehet orvosolni az Átalakítás -> Kitöltés -> Le opcióval.

    A végeredmény jól néz ki:

    13. Most már csak meg kell szabadulnunk azoktól a soroktól ahol az érték oszlopban az azonosító látható, megint az attributum oszlop segít nekünk. A ".1"-re végződő attributomok nem érdekelnek minket.
    Attributom oszlopon Szövegszűrők -> Nem erre végződik opcióval tudjuk elérni ezt.

Új hozzászólás Aktív témák