Hirdetés
- Mit várunk 2026-ban a mobilpiacon?
- Samsung Galaxy S25 - végre van kicsi!
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Rugalmas OLED panelre válthat a Samsung Galaxy A57
- iPhone topik
- Azonnali navigációs kérdések órája
- OnePlus 15 - van plusz energia
- Bemutatkozott a Poco X7 és X7 Pro
- Apple iPhone 17 Pro Max – fennsík
- Samsung Galaxy A56 - megbízható középszerűség
-
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
ny.janos
#53237
üzenetére
Szia,
Tegnap küldtem hibajelentést a Microsoftnak, hogy Excel Power Query-ben nem műkődik jól a sorbarendezés ékezetes betűk esetén. Meglátjuk, hogy mikor lesz belőle vmi.
Amivel próbálkoztam és háthat segítség neked:
1. Power BI Desktop-ban jó a rendezés, M-kód teljesen azonos. Pár perc alatt megvagy ott vele.
2. Ha átmenetileg lecseréljük az ékezetes betűket az ékezetesmentes változatukkal és úgy rendezünk, akkor jobb eredményünk lesz, de ez sem tökéletes.
Ezt simán a GUI-val is meg lehet csinálni többlépéssel, de itt egy list-et tartalmazó változat.
Van két segédlistám, ABCIn és ABCOut tartalmazza az ékezetes betüket és azok ékezetmentes változatát. Az M-kódjuk:= {"á", "é", "í", "ó", "ö", "ő", "ú", "ü", "ű"}= {"a", "e", "i", "o", "o", "o", "u", "u", "u"}Az Excel lapról jön a lista, amihez egy új oszlopot adtam amelynek a képlete:
=Text.Combine(List.Transform(Text.ToList(Text.Lower([Nevek])),each try ABCOut{List.PositionOf(ABCIn, _)} otherwise _))
A képlet legelőször kisbetűsre alakítja az eredeti szöveget, majd betűnként felszabdalva listába teszi. Ezen a listán végigmegyünk és ott ahol ékezetes betűt találunk lecseréljük a megfelelőre, a többi értéket nem változtatjuk. A végén az egészet összefűzzük.Az új oszlop alapján sorbarendezünk, utána törölhető az oszlop.
A teljes M-kód:
let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Added Custom" = Table.AddColumn(Source, "Sorrendhez", each Text.Combine(
List.Transform(Text.ToList(Text.Lower([Nevek])),
each try ABCOut{List.PositionOf(ABCIn, _)} otherwise _)
)
),
#"Sorted Rows" = Table.Sort(#"Added Custom",{{"Sorrendhez", Order.Ascending}}),
#"Removed Columns" = Table.RemoveColumns(#"Sorted Rows",{"Sorrendhez"})
in
#"Removed Columns"üdv
Új hozzászólás Aktív témák
- MS SQL Server 2016, 2017, 2019
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- OnePlus Nord 2T 128GB, Kártyafüggetlen, 1 Év Garanciával
- Telefon felvásárlás!! iPhone 12 Mini/iPhone 12/iPhone 12 Pro/iPhone 12 Pro Max
- Mini Pc HP ProDesk 600 G2 G3 G4 /// 6-8. gen //// i3 / i5 /// garancia /// Budapest / MPL / Foxpost
- BESZÁMÍTÁS! ASUS H510M i3 10100F 8GB DDR4 120GB SSD 1TB HDD GTX 1050Ti 4GB Fractal Design 500W
- Dell Precision 7550 i7-10850H 32GB 1TB Nvidia RTX3000 6GB 1 év garancia
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopszaki Kft.
Város: Budapest
Fferi50

