Hirdetés
- Luck Dragon: Asszociációs játék. :)
- sh4d0w: Nyitlocker
- Cifu: Űrhajózás 2025 - Összefoglaló írás
- MasterDeeJay: i7 4980HQ asztali gépben (vs i7 4770)
- MasterDeeJay: Ram gondolatok 2026 január - DDR3-as gép is lehet megoldás? Mi a minimum?
- sziku69: Szólánc.
- eBay-es kütyük kis pénzért
- Parci: Milyen mosógépet vegyek?
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
-
LOGOUT
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
bteebi
#25180
üzenetére
Szia!
Egyrészt, ha eseménykezelést végzel, akkor ki kell kapcsolni az eseményeket:
Application.EnableEvents=False
majd a végén visszakapcsolod:
Application.EnableEvents=True
Ha nem így teszel, akkor jó esetben csak meghosszabodik a program futása, rossz esetben más cellákat is átír, nem csak azokat, amelyeket szeretnéd.Továbbá van két képlet benne, ami formailag ugyan helyes (nem kiabál érte a fordító), de teljesen blőd eredményt ad, rossz helyre került a záró zárójel:
If Sheets("proba").Cells(sor - 72, 5) < Sheets("proba").Range("S130") Or WorksheetFunction.IsNumber(Sheets("proba").Cells(sor - 72, 5)) = True
A Te kódodban a True után volt a zárójel, az előréb kell hozni az egyenlőség jel elé, ahogyan itt is látod.
Ugyanez van az oszlopos vizsgálatánál is, ott is az egyenlőség jel után kell a zárójel és nem a False után.
Üdv.
Új hozzászólás Aktív témák
Hirdetés
- Androidos fejegységek
- Androidos tablet topic
- Mibe tegyem a megtakarításaimat?
- Gigantikus átalakulásra készül a Vulkan API
- Luck Dragon: Asszociációs játék. :)
- Poco X6 Pro - ötös alá
- Bemutatkozott a Poco X7 és X7 Pro
- Highguard - Küszöbön a megjelenés, mégsem tudunk róla szinte semmit
- sh4d0w: Nyitlocker
- 3D nyomtatás
- További aktív témák...
- HIBÁTLAN iPhone 13 Pro Max 256GB Gold -1 ÉV GARANCIA - Kártyafüggetlen, MS3685
- Új HP 17 FHD IPS AMD Ryzen5 7520U 4.3Ghz 8GB DDR5 256GB SSD AMD Radeon 610M Graphics Win11 Garancia
- Apple iPad 7 32GB (3 hó Garancia)
- AZONNALI SZÁLLÍTÁS Eredeti Microsoft Office 2019 Professional Plus
- Samsung Galaxy A20e 32GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Fferi50
