Hirdetés
- Mostantól több képkockát generálhat az új Arc meghajtó
- Önmagában is értékesíthetőnek tartja a Vera CPU-t az NVIDIA
- A sufni mélyén született a Galax Titan RTX Hall of Fame VGA
- Rég elfeledett képaránnyal nyúzhatjuk a múlt nagyjait az AYANEO kézikonzoljával
- Ráncfelvarrás után marad nagyjából ugyanaz a Minsforum OCuLinkes mini PC-je
- Azonnali VGA-s kérdések órája
- Nem indul és mi a baja a gépemnek topik
- Milyen billentyűzetet vegyek?
- OLED TV topic
- TCL LCD és LED TV-k
- A sufni mélyén született a Galax Titan RTX Hall of Fame VGA
- Asus ProArt x570 Creator alaplap javítása?
- Milyen notebookot vegyek?
- OLED monitor topic
- AMD K6-III, és minden ami RETRO - Oldschool tuning
-
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
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Candy: Kossuth Lajos azt üzente, elfogyott a gémergépe
- Azonnali VGA-s kérdések órája
- Nem indul és mi a baja a gépemnek topik
- A fociról könnyedén, egy baráti társaságban
- Bittorrent topik
- Realme GT 2 Pro - papírforma
- EAFC 26
- Kell-e a korlátlan mobilnet, vagy luxusból égetjük a pénzt?
- Székesfehérvár és környéke adok-veszek-beszélgetek
- További aktív témák...
- Eladó Steam kulcsok kedvező áron!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Humble szökevények 500-1500Ft
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- Xiaomi Redmi Note 13 5G (2024) / 8/256GB / Kártyafüggetlen / 12 Hó Garancia
- Azonnali készpénzes AMD Radeon RX 5000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
- Telefon felvásárlás!! iPhone 14/iPhone 14 Plus/iPhone 14 Pro/iPhone 14 Pro Max
- HIBÁTLAN iPhone 13 128GB Green-1 ÉV GARANCIA - Kártyafüggetlen, MS4347
- Telefon felvásárlás!! Xiaomi Redmi Note 10, Xiaomi Redmi Note 10s, Xiaomi Redmi Note 10 Pro
Állásajánlatok
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest

Fferi50

