-
IT café
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
-
bsasa1
csendes tag
válasz
alfa20 #32305 üzenetére
Szia, persze simán.
Sub szamol()
Dim FolderPath As String, path As String, count As Integer
FolderPath = "mappa teljes elérési útja"
path = FolderPath & "\*.xls"
Filename = Dir(path)
Do While Filename <> ""
count = count + 1
Filename = Dir()
Loop
'count tartalmazza a .xls fájlok számát a mappában, ha xlsx, akkor fent is .xlsx
End Sub
Új hozzászólás Aktív témák
- One mobilszolgáltatások
- NVIDIA GeForce RTX 4080 /4080S / 4090 (AD103 / 102)
- Samsung Galaxy A35 5G - fordulópont
- Kínai és egyéb olcsó órák topikja
- PlayerUnknown’s Battlegrounds
- PlayStation 3
- RIOS Gépház: Terheléses támadás alatt a PROHARDVER! lapcsalád
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Az iPhone-t oktatja a Vivo X200 Ultra
- Steam Deck
- További aktív témák...
- World of Warcraft Burning Crusade Collector's edition bontatlan
- Játékkulcs BAZÁR! STEAM/ORIGIN/BATTLE.NET / PS5/XBOX/EPIC/GOG/EA/UPLAY
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- World of warcraft Vanilla Collectors edition
- Diablo 3 Collector's Edition
- Telefon felvásárlás!! iPhone 13 Mini/iPhone 13/iPhone 13 Pro/iPhone 13 Pro Max/
- Bomba ár! Dell Precision 3541 - i7-9850H I 16GB I 256SSD I HDMI I Nvidia P620 4GB I Cam I W11 I Gar
- Ultimate előfizetés új fiókra akár 2105 Ft/hó áron! Azonnali, automatizált aktiválással, csak Nálam!
- Realme 7i 64GB, Kártyafüggetlen, 1 Év Garanciával
- Samsung Galaxy A22 5G 128GB, Kártyafüggetlen, 1 Év Garanciával
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest