Hirdetés
- TCL LCD és LED TV-k
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- SteamOS gyere már PC-re! Nem, még nem jött el az idő.
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- NVIDIA® driverek topikja
- CES 2026: a Gigabyte legfrissebb csúcs-VGA-ja mindenképp kitűnik a tömegből
- Videós, mozgóképes topik
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- ThinkPad (NEM IdeaPad)
- Projektor topic
-
PROHARDVER!
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
-
Fferi50
Topikgazda
válasz
andreas49
#52244
üzenetére
Szia!
Akkor nem kell a Val függvény szerintem.
Van / vagy csinálsz - a munkalapon egy listát a számokból egy tartományban. Ezt rendezed növekvő vagy csökkenő sorrendbe, ahogy szeretnéd.
A makróban pedig végigmész a tartományon pl. így (a lista a lista nevű munkalap A oszlopában van):for xx=1 to Sheets.Count-1 Sheets("lista").Cells(xx,1).Text.Move before:=Sheets(xx):Next
Ez működik növekvő és csökkenő sorrend szerint is, ahogyan a listát rendezed a makró indítása előtt -- ill. a rendezést is beleteheted a makróba.
Fontos, hogy a listát tartalmazó munkalap névvel legyen a tartomány előtt, mert ha közben elmozdul, a sima cella az aktuális munkalapra fog mutatni, amiben ki tudja milyen érték van az adott helyen.
Ha külön munkalapon van a munkalap számlistád azt el is rejtheted.
Üdv.
Új hozzászólás Aktív témák
- Azonnali fáradt gőzös kérdések órája
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- Vicces képek
- TCL LCD és LED TV-k
- Poco F8 Ultra – forrónaci
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- SteamOS gyere már PC-re! Nem, még nem jött el az idő.
- Apple iPhone 17 - alap
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- További aktív témák...
- HIBÁTLAN iPhone 11 Pro 256GB Space Grey -1 ÉV GARANCIA - Kártyafüggetlen, MS3173, 100% Akkumulátor
- Telefon felvásárlás!! Xiaomi Redmi Note 13, Xiaomi Redmi Note 13 Pro, Xiaomi Redmi Note 13 Pro+
- iKing.Hu - HONOR 400 Lite 5G Velvet Grey Vékony, könnyű, AI-kameragomb 8/256 GB- 2027. 07. 01
- BESZÁMÍTÁS! GIGABYTE B760M i7 12700 32GB DDR4 1TB SSD RX 7800 XT 16GB ASUS A31 PLUS ARGB 750W
- 134 - Lenovo Legion Pro 7 (16IRX8H) - Intel Core i9-13900HX, RTX 4090 - 3 év garancia
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50

