Funkcia CurDir

Poznámka : Funkcia, metóda, objekt alebo vlastnosť, ktoré sú popísané v tejto téme, sú vypnuté, ak je služba Microsoft Jet Expression Service spustená v režime karantény, ktorý zabraňuje vo vyhodnocovaní možných nebezpečných výrazov. Ďalšie informácie o režime karantény nájdete vyhľadaním výrazu „režim karantény“ v Pomocníkovi.

Vráti hodnotu typu Variant (String), ktorá predstavuje aktuálnu cestu.

Syntax

CurDir[(jednotka)]

Voliteľný argument jednotka argument je reťazcový výraz, ktorý určuje existujúcu jednotku. Ak nie je zadaný žiadny disk, alebo ak argument jednotka je reťazec s nulovou dĺžkou (""), funkcia CurDir vráti cestu k aktuálnej jednotke. V počítači Macintosh funkcia CurDir ignoruje akúkoľvek zadanú jednotku a jednoducho vráti cestu pre aktuálnu jednotku.

Príklad

Poznámka : Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.

V tomto príklade je funkcia CurDir použitá na vrátenie aktuálnej cesty. V počítači Macintosh sa špecifikácia jednotky zadaná vo funkcii CurDir ignoruje. Predvolený názov jednotky je „HD“ a časti názvu cesty sú oddelené dvojbodkami, nie opačnými lomkami. Podobne sa zadávajú aj priečinky s názvom Macintosh namiesto \Windows.

' Assume current path on C drive is "C:\WINDOWS\SYSTEM" (on Microsoft Windows).
' Assume current path on D drive is "D:\EXCEL".
' Assume C is the current drive.
Dim MyPath
MyPath = CurDir ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("C") ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("D") ' Returns "D:\EXCEL".
Rozšírte svoje zručnosti
Preskúmať školenie
Buďte medzi prvými, ktorí získajú nové funkcie
Pridajte sa k insiderom pre Office

Boli tieto informácie užitočné?

Ďakujeme za vaše pripomienky!

Ďakujeme vám za pripomienky. Pravdepodobne vám pomôže, ak vás spojíme s pracovníkom podpory pre Office.

×