Hirdetés
- Kormányok / autós szimulátorok topikja
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- Soha nem szabta ilyen pénztárcabarátra új CPU-it az Intel
- Az olcsó Macbook sokkolja a PC-ipart az ASUS társvezetője szerint
- Bambu Lab 3D nyomtatók
- Döbbenetesen sok energia kell az érkező Nova Lake működéséhez?
- Milyen TV-t vegyek?
- Milyen processzort vegyek?
- OLED TV topic
- AMD vs. INTEL vs. NVIDIA
-
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
EmberXY
#33715
üzenetére
Szia!
Bocsánat, teljesen igaza van az Excelnek. Ha modulba illeszted, akkor az utolsó sor nem end if, hanem end sub kell legyen, bárhova is illeszted be. Nem akartalak megszivatni, csak figyelmetlen voltam, sorry

Sub figyelmeztet()
If Application.CountIf(Sheets(jegyzetlap).UsedRange, "n") > 0 Then MsgBox "Elintézetlen tétel van"
End SubHa a Thisworkbook Workbook_Open eseményébe, akkor csak a középső sor kell a megjelenő vázlat közé:
Private Sub Workbook_Open()
If Application.CountIf(Sheets(jegyzetlap).UsedRange, "n") > 0 Then MsgBox "Elintézetlen tétel van"
End SubA korábbi kérdésedre: Ebben a formában csak az egyedülálló "n"-eket keresi (így pl. az igen nem játszik a számolásnál. Ha "n"-t tartalmazó szavakat keresel, akkor "*n*" minden olyan cellát beleszámol, amelyben az n betű előfordul.
Üdv.
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Windows 10
- Formula-1
- Kormányok / autós szimulátorok topikja
- Házi barkács, gányolás, tákolás, megdöbbentő gépek!
- PROHARDVER! feedback: bugok, problémák, ötletek
- Gitáros topic
- Metal topik
- ASUS routerek
- Xiaomi 13T és 13T Pro - nincs tétlenkedés
- További aktív témák...
- PC Game Pass előfizetés
- Xbox / Microsoft Store feltöltőkártya kód (digitális, HU) több címlet, több db, azonnal, olcsón
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- iPhone 13 Pro 256GB Sierra Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS4383, 100% Akkumulátor
- 3DKRAFT.HU - 3D NYOMTATÁS - AZONNALI ÁRAJÁNLAT - GYORS KIVITELEZÉS - 510+ POZITÍV ÉRTÉKELÉS
- Telefon felvásárlás!! Xiaomi Redmi Note 13, Xiaomi Redmi Note 13 Pro, Xiaomi Redmi Note 13 Pro+
- Apple iPhone 11 Pro 64GB, Kártyafüggetlen, 1 Év Garanciával
- Dell XPS 13 9300 i7-1065G7 8GB 512GB FHD+ 500nit! 1 év garancia
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

Fferi50
