Hirdetés
- Szívós, szép és kitartó az új OnePlus óra
- Honor Magic8 Pro - bevált recept kölcsönvett hozzávalókkal
- Neked tükröt, az iPhone Airnek emléket állít a Realme
- Soundcore Sleep A30 - a hosszú házasság titka
- Honor Magic V2 - origami
- Google Pixel topik
- Az órádnál fogva vezet nyomra az új Apple AirTag
- Yettel topik
- Apple iPhone 6s - Nyomás utána!
- Redmi Note 15 Pro 5G – a szokásosat?
-
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
-
KaliJoe
tag
Sziasztok

Az alábbi - de tulajdonképpen bármely másik - két programocskát / funkciót szeretném elérhetővé tenni, bármely fájlomban lévő, bármely makróm számára. A két makrócska helye a PERSONAL.XLSB-ben van.
Kérdés: Mit kellene még tennem, h a más Excelekben lévő makrók meghívhassák, futtathassák e makrókat?
Option Explicit
Function Incr(var_Szám As Variant, Optional var_Növ = 1) As Variant
' If IsMissing(var_Növ) = True Then var_Növ = 1
Let Incr = var_Szám + var_Növ
End Function
Function Decr(var_Szám As Variant, Optional var_Csökk = 1) As Variant
' If IsMissing(var_Csökk) = True Then var_Csökk = -1
Let Decr = var_Szám - var_Növ
End Function
Új hozzászólás Aktív témák
- Óvodások homokozója
- Székesfehérvár és környéke adok-veszek-beszélgetek
- HiFi műszaki szemmel - sztereó hangrendszerek
- Projektor topic
- Media Player Classic és Home Cinema (MPC-HC)
- Napelem
- Szívós, szép és kitartó az új OnePlus óra
- Sweet.tv - internetes TV
- Ilyet se látunk minden nap, már füstölt a GeForce, de a játék még futott
- Milyen routert?
- További aktív témák...
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Játékkulcsok ! : PC Steam, EA App, Ubisoft, Windows és egyéb játékok
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap - 15% AKCIÓ
- HP EliteOne 800 G6 All-in-One i5-10500 16GB 512GB 24" Érintőkijelző!! 1 év garancia
- Készpénzes / Utalásos Videokártya és Hardver felvásárlás! Személyesen vagy Postával!
- MSI 17 Pulse FHD IPS 144Hz i7-13700H 14mag 16GB 512GB SSD Nvidia RTX 4060 8GB 140W Win11 Garancia
- HIBÁTLAN iPhone 14 Pro 128GB Space Black-1 ÉV GARANCIA - Kártyafüggetlen, MS4420, 100% Akksi
- utolsó - Dell Alienware 18 Area-51 AA18250 18" - Intel Core Ultra 9 275HX, 64GB, 2TB SSD, RTX 5090
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs

Fferi50

