Hirdetés
- Xiaomi 17 Ultra - jó az optikája
- Honor Magic8 Pro - bevált recept kölcsönvett hozzávalókkal
- Milyen okostelefont vegyek?
- Vivo X300 Ultra - tárcsázz, ha van rá keret!
- iOS alkalmazások
- Okosóra és okoskiegészítő topik
- Samsung Galaxy Watch8 - Classic - Ultra 2025
- Xiaomi 15T Pro - a téma nincs lezárva
- Távozik az Apple vezérigazgatója
- OnePlus Watch 4 néven újráz az Oppo Watch X3
-
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
-
edari
őstag
Sziasztok
Makróban szeretnék segítséget kérni. Sorokat kéne csoportosítanom 6000 soron keresztül. Azonban nem egyszerű a dolog, mert nem fix sorokat kell csoportosítani. Mutatok egy példát:
Annyi a lényeg, hogy 2 kategória (Fő és al), és azt kéne csinálnia a makrónak hogy az alkategória alatti sorokat csoportosítja. Mivel váltakozó sorokban helyezkednek el az adatok, ezért annyi a támpont hogy az alkategóriás sorok mindig félkövérek (a fő kategóriák pedig félkövér és dőltek, de ez most nem is annyira lémyegeg).
Ezt megleht egyáltalán oldani makróval? -
edari
őstag
Csak egy példa, átírod a tartományt (A1: BZ1), illetve a Field értékét, és a munkalapot (Munka8).
With Munka8
.AutoFilterMode = False
.Range("A1:BZ1").AutoFilter 'Filter bekapcsolása
.Range("A1:BZ1").AutoFilter Field:=1, Criteria1:="OK" 'Kritérium megadása
.Range("A2:BZ100000").SpecialCells(xlCellTypeVisible).EntireRow.Delete 'Kritériumnak eleget tevő cellák törlése
Cells.AutoFilter 'Filter törlése
Range("A1").Select 'Alap kiindulópont beállítása
Application.CutCopyMode = False 'Kijelölés megszüntetése
MsgBox ("Ok")
End With -
edari
őstag
Sziasztok
Makróban kérnék segítséget.
Van egy nagy adattömböm, aminek az első oszlopára akarok filtert beállítani, majd amiket kidob sorokat, azokat törölni. Már minden megvan, de hiába állítom be a kritériumot, nem akarja kidobni az ominózus sorokat. Rá is jöttem a hibára: a makró számszűrőt használ a filter esetében, én pedig ugye csak simán az értéket írom be a filternél. Mutatom is a problémát:Ez lenne a kód, és az eredmény:
Ő a számszűrőbe írja kritériumot, de ha én csak simán a keresőmezőbe, akkor jó a feltétel:
Nem lehet makrón belül beállítani hogy milyen típusú filtert használjon?
-
edari
őstag
Sziasztok
Egy viszonylag könnyű hibába futottam bele, valamiért mégse tudom megoldani.
Arról lenne szó hogy van egy adathalmaz, ami csak számokat tartalmaz, ezeket kéne összeadni, de a buktató a dologban az, hogy van olyan cella ami #-el kezdődik (ezeket a cellákat egyébként se kéne beleszámolni az összegbe). Ugye ezek miatt az értékek miatt a szum 0-át ad.
Kérdés: tud valaki olyan megoldást ami kiszűri a #-el keződő cellákat?
Egyszer már csináltam ilyet, de már nem tudom hogy hogyan.
-
#31676
edari
őstag
JagdPanther
#31675
edari
őstag
válasz
JagdPanther
#31675
üzenetére
Ja, az kimaradt hogy makró kéne rá. Bocsi.
-
#31674
edari
őstag
JagdPanther
#31673
edari
őstag
válasz
JagdPanther
#31673
üzenetére
Kattints bele vagy állj rá a cellára, nyomj egy f2-t, menj a sor végére, és ott nyomj alt+entert.
Új hozzászólás Aktív témák
Hirdetés
- AMD Ryzen 9 / 7 / 5 9***(X) "Zen 5" (AM5)
- Xiaomi 17 Ultra - jó az optikája
- Nem indul és mi a baja a gépemnek topik
- EA Sports WRC '23
- Mibe tegyem a megtakarításaimat?
- Honor Magic8 Pro - bevált recept kölcsönvett hozzávalókkal
- AMD vs. INTEL vs. NVIDIA
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- DUNE médialejátszók topicja
- Milyen notebookot vegyek?
- További aktív témák...
- PC Game Pass előfizetés
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem.
- Game Pass Ultimate előfizetések 3 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Magyar, Aktiválatlan! Apple MacBook Pro 14! M3, 8GB, 500GB! BeszámítOK
- HIBÁTLAN iPhone 15 Pro 128GB Blue Titanium-1 ÉV GARANCIA - Kártyafüggetlen, MS4692, 92% AKKSI
- Azonnali készpénzes félkonfig / félgép felvásárlás személyesen / csomagküldéssel korrekt áron
- Lenovo Thinkpad P15 Gen 2 - 23 akkuciklus - 27% ÁFÁS (0358AB)
- Realme GT 7 Pro 5G Mars Orange 12/256GB használt karcmentes 6 hónap garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest