Funkce CurDir

Poznámka: Funkce, metoda, objekt nebo vlastnost popsaná v tomto tématu je zakázaná, pokud je služba Microsoft Jet Expression Service spuštěná v režimu izolovaného prostoru (sandbox), což brání vyhodnocení potenciálně nebezpečných výrazů. Další informace o režimu izolovaného prostoru najdete v nápovědě k režimu izolovaného prostoru.

Vrátí hodnotu varianty(řetězce),která představuje aktuální cestu.

Syntaxe

CurDir[(jednotka)]

Volitelná jednotkaArgument je Řetězcový výraz, která určuje stávající jednotku. Pokud není zadaná žádná jednotka nebo pokud je jednotka řetězec s nulovou délkou (""), vrátí curDir cestu k aktuální jednotce. Na macintoshi CurDir ignoruje zadanou jednotku a jednoduše vrátí cestu k aktuální jednotce.

Příklad

Poznámka: Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.

V tomto příkladu se funkce CurDir používá k vrácení aktuální cesty. Na platformě Macintosh jsou specifikace jednotky uvedené v curdiru ignorovány. Výchozí název jednotky je HD a části cesty jsou místo zpětného lomítka oddělené dvojtečkami. Podobně byste zaazujte složky Macintosh místo \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".

Potřebujete další pomoc?

Rozšiřte své dovednosti s Office
Projít školení
Získejte nové funkce jako první
Připojte se k účastníkům programu Office Insiders

Byly tyto informace užitečné?

Děkujeme vám za zpětnou vazbu.

Děkujeme vám za váš názor! Pravděpodobně bude užitečné, když vás spojíme s některým z našich agentů podpory Office.

×