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

• #49485 Mutt senior tag Misi_D #49483

  Új Válasz 2022-08-26 15:07:35 #49485

  Ú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 Misi_D #49483 üzenetére

  Szia,

  A héten tanultam, hogy Pivot-ban a sor értékeket át lehet nevezni. Állj rá az "(üres)" cellára és fent a szerkesztő lécben (vagy F2-vel helyben) írd át egy szóközre az értéket.

  Visszacsinálni ezt trükkös, de kb. 10-et visszaolvasva látsz tőlem egy makrós megoldást, illetve az eredeti kérdezőtől egy másikat.

  üdv.

• #49484 Fferi50 Topikgazda Misi_D #49483

  Új Válasz 2022-08-26 12:36:11 #49484

  Ú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

  

  Fferi50

  Topikgazda

  válasz Misi_D #49483 üzenetére

  Szia!
  A PowerPivotban van olyan opció a lekérdezés szerkesztő nézetben az átalakítás csoportban, hogy értékek lecserélése. Próbáld ki ott a "(üres)" értéket lecserélni valódi üres cellára, azaz a csere a következőre részt teljesen üresen hagyni.
  
  Üdv.

• #45233 Mutt senior tag Misi_D #45222

  Új Válasz 2020-11-04 21:23:28 #45233

  Ú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 Misi_D #45222 üzenetére

  Szia,

  Ezt próbáld ki.

  1. Fájl importálása Power Query-be.
  2. Majd csoportosítás és a keresd meg id-nként a ciklusszámláló maximumát.
  
  3. Most jön egy furcsa lépés, de így a legyegyszerűbb. Szóval lekérdezések egyesítése és ott válaszd ki a táblát kétszer és add meg hogy az id és a ciklusszámláló alapján keressen belső egyezést.
  
  4. Jön a második furcsa lépés, de ehhez M-kódot kell módosítani. A szerkesztő lécen vmi ilyen kód lesz:
  

  Ahol a #"Sorok csoportosítva" egy hivatkozás egy korábbi lépésre aminek egy tábla az eredménye. Power Query-ben nem kötelező a közvetlen előző lépésre hivatkozni, lehet bármelyik korábbira hivatkozni. Nekünk pedig az a lépés kell ami még az eredeti (nem csoportosított adatsort) tartalmazza. Az én esetmben ezt a lépést "Típus módosítva"-nak hívják. Még egy módosítás kell, "max" oszlop nincs az eredeti táblázatban hanem ott nekem "counter" van ezt is le kell cserélni.

  Ha ezeket javítod akkor ez lesz az eredmény:
  

  5. Most már csak ki kell bontanod a Sorok csoportosítva oszlopot és megkapod kívánt eredményt.

  üdv.

  Ps. Ha a nagy fájl miatt lassú lenne a feldolgozás, akkor még egy trükk. Lehet puffereltetni egy adott táblát.
  Az én esetemben a "Típus módosítva"-t érdemes. Ehhez azt kell csinálni, hogy ezen lépés után beszúrsz egy új lépést (pl. új oszlop hozzáadása). Majd a kapott M-kódot felülírod ezzel: = Table.Buffer(#"Típus módosítva")

• #45227 Fferi50 Topikgazda Misi_D #45226

  Új Válasz 2020-11-04 11:12:36 #45227

  Ú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

  

  Fferi50

  Topikgazda

  válasz Misi_D #45226 üzenetére

  Szia!
  Egy lehetőség, logikai szinten leírva:
  Az első előfordulást beteszed a munkalap következő sorába. A következő előfordulásnál megkeresed, hol van a munkalapon, megnézed a másik változó értéke milyen, ha nagyobb, akkor kicseréled a sort az újra, ha nem, akkor hagyod békében.
  Ezt csinálod végig a fájlon.
  Előny, hogy akkor is használható, ha a csv fájlban nem sorban vannak az ID-k.
  A munkalapon kereshetsz a Range.Find metódussal vagy kereső függvényekkel egyaránt.
  A beolvasásnál a kinput változóban a teljes sor kerül. Ebből neked kell meghatározni, hol az id és a számodra szükséges változó adata. Ha tudod, hogy hanyadik oszlopban van, akkor pl. használhatod a Split függvényt, amelyik a megadott határoló (pl. pontosvessző - ; - ) szerint egy tömbbe transzformálja a szöveget. A tömb indexe 0-val indul. Innen már meg tudod kapni a keresett adatokat.
  Egy példa:
  Sub beolvaso()
Dim utja As String, fnev As String, kinput As String, fc As Byte, cl As Range, bejott, holvan As Range
utja = "C:\Users\user\Documents"
fnev = "\xxx.csv"
fc = FreeFile()
Open utja & fnev For Input As #fc
Set cl = ActiveSheet.Cells(1, 1) 'az aktív munkalap első cellájába kerül az első adat
'ha nem ide szeretnéd, akkor változtasd meg a Cells paramétereit
Do While Not EOF(fc)
Line Input #fc, kinput
bejott = Split(kinput, ";") 'egy tömbbe transzformáljuk a bejött adatot
'megkeressük az azonosítót az első oszlopban. Ha nem ide tetted, akkor írd át az oszlop számát
'ha nem az input első adata az ID akkor bejott(0) paraméterét írd át a megfelelő oszlopra
Set holvan = ActiveSheet.Columns(1).Find(what:=bejott(0), LookIn:=xlValues, lookat:=xlWhole)
If holvan Is Nothing Then  'ha még nincs, akkor bejegyezzük az első szabad sorba
   'cl.Value = kinput 'ez a sor egy cellába tenné a teljes inputot
   Range(cl, cl.Offset(0, UBound(bejott))).Value = bejott ' így viszont külön cellába kerülnek az értékek
   Set cl = cl.Offset(1, 0) 'ez lesz a következő üres sor első cellája
Else
   If holvan.Offset(0, 2).Value < bejott(2) Then 'ha a változó nem a második az adatok között, akkor
   'mindkét 2-est írd át megfelelőre - az offset és a tömb paramétere is 0-tól indul.
      Range(holvan, holvan.Offset(0, UBound(bejott))).Value = bejott 'kicseréljük az újra
   End If
'MsgBox kinput
End If
Loop
Close #fc
MsgBox "Az input kész!"
End Sub

  Remélem, sikerül.
  Üdv.

• #45225 Fferi50 Topikgazda Misi_D #45224

  Új Válasz 2020-11-04 08:33:51 #45225

  Ú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

  

  Fferi50

  Topikgazda

  válasz Misi_D #45224 üzenetére

  Szia!
  Excelben van lehetőség arra is, hogy egy fájlt direkt eléréssel nyiss meg és olvass be. Így megoldható, hogy csak azt a rekordot tedd be a munkalapra, amelyikre szükséged van.
  Itt a példa:
  Sub beolvaso()
Dim utja As String, fnev As String, kinput As String, fc As Byte
utja = "C:\Users\user\Documents"
fnev = "\xxx.csv"
fc = FreeFile()
Open utja & fnev For Input As #fc ' file megnyitása
Do While Not EOF(fc)
Line Input #fc, kinput 'egy teljes sor beolvasása a fájlból
MsgBox kinput 'itt megnézheted, mit olvastál be, ennek a helyére ill. ez után jöhet feldolgozás
Loop
Close #fc ' fájl bezárása
End Sub
  Ez csak a fájlművelet, természetesen az excel munkalap kezelését is meg kell oldanod előtte illetve közben.
  Remélem hasznos lesz neked.
  Itt találsz a Line Input-ról súgót, illetve innen megtalálod a direkt fájlkezelés példáit is. [link]
  Üdv.

• #45223 Delila_1 veterán Misi_D #45222

  Új Válasz 2020-11-04 07:52:32 #45223

  Ú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

  

  Delila_1

  veterán

  válasz Misi_D #45222 üzenetére

  Abban nem tudok segíteni. Ha nem kapsz más választ, akkor a képleteket tartalmazó területet saját magára másolod értékként, majd az eredeti oszlopokat törlöd.

• #45221 Delila_1 veterán Misi_D #45219

  Új Válasz 2020-11-04 07:11:10 #45221

  Ú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

  

  Delila_1

  veterán

  válasz Misi_D #45219 üzenetére

  Nem biztos, hogy jól értem a feladatot.
  A képen a betöltött adatok az A:C oszlopokban vannak. A G oszlopban az Ismétlődések eltávolítása funkcióval minden ID értéket egyszer szerepeltettem.
  A H2 képlete =INDEX($A$1:$C$15;HOL.VAN($G2;$A$1:$A$15);2), az I2-é
  =INDEX($A$1:$C$15;HOL.VAN($G2;$A$1:$A$15);3)

  

• #42746 Delila_1 veterán Misi_D #42744

  Új Válasz 2020-01-17 06:56:18 #42746

  Ú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

  

  Delila_1

  veterán

  válasz Misi_D #42744 üzenetére

  Láthatsz egy képpel illusztrált példát a megoldásra itt.
  Feltöltöd a C oszlopot nullákkal, majd indítod a Solvert az Adatok menü Elemzés csoportjában. Ha nem találod, előbb a Beállítások | Bővítményeknél be kell jelölnöd a Solvert.

• #42745 Fferi50 Topikgazda Misi_D #42744

  Új Válasz 2020-01-16 20:05:55 #42745

  Ú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

  

  Fferi50

  Topikgazda

  válasz Misi_D #42744 üzenetére

  Szia!
  Használhatod hozzá a Solvert. A napi értékesítések mellé felveszel két segédoszlopot. Az egyikbe 0 és 1 kerül, a másikba az értékesítés és a mellette levő 1/0 szorzata. Ennek az összegét kell célértékként megadnod. Változóként pedig a 0/1-es oszlopot. Továbbá korlátozni kell ennek az oszlopnak a felvehető értékeit 0 és 1-re.

  Üdv.

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