- Xiaomi 15T Pro - a téma nincs lezárva
- iPhone topik
- Túl jól fogy az S26, túlóráznia kell a gyártósoroknak
- Bemutatkozott a Poco X7 és X7 Pro
- Xiaomi 17 Ultra - jó az optikája
- Milyen okostelefont vegyek?
- Samsung Galaxy S26 Ultra - fontossági sorrend
- Microsoft Lumia 640 és 640 XL - testvérek egymás között
- Motorola Edge 70 - többért kevesebbet
- Redmi Note 13 Pro 5G - nem százas, kétszázas!
-
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
-
válasz
zsotesz81
#8456
üzenetére
Hali!
Ebből a kódból az alábbi részből meríthetsz ihletet
On Error Resume Next
Set My_Sheet = Sheets(My_Sheet_Name)
On Error GoTo 0
If Not My_Sheet Is Nothing Then
My_Sheet.Delete
End IfEz létező munkalap esetén törli azt, egy kis átalakítással neked is megfelelhet, de ez függ a programod felépítésétől.
Másik alapmódszer az szokott lenni, hogy egy ciklussal végigmész a munkalapokon, a cikluson belül megvizsgálod a nevét, ha megegyezik, akkor valamilyen változót magasra állítasz és kilépsz a ciklusból. Ezt követően megvizsgálod azt a bizonyos változót, éa feltételnek megfelelően kihagysz programrészt.
Fire.
Új hozzászólás Aktív témák
- Lightyear - befektetési app
- sziku69: Szólánc.
- Azonnali fotós kérdések órája
- Tápos kibeszélő offtopik
- Luck Dragon: Asszociációs játék. :)
- Kormányok / autós szimulátorok topikja
- sziku69: Fűzzük össze a szavakat :)
- Milyen autót vegyek?
- exHWSW - Értünk mindenhez IS
- Fejhallgató erősítő és DAC topik
- További aktív témák...
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
- Game Pass Ultimate előfizetések 3 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- 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
- Microsoft Office 2024 Home Business dobozos
- Gamer PC-Számítógép! Csere-Beszámítás! R7 5700 / RTX 2080Ti 11GB / 16GB DDR4 / 1TB SSD!
- Lenovo ThinkStation P330 Gen 2 Tower i7 / Xeon workstation /számla- garancia
- Xbox Wireless Headset 3 hó garancia, számlával!
- Bontott 0perces MacBook Air 15" M4 10C/10G 16GB 512GB Gar.: 1 év
- HP ProBook 450 G6,15.6",FHD,i3-8145U,8GB DDR4,256GB SSD,WIN11
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Fferi50
