Obs!: Funktionen, metoden, objektet eller egenskapen som beskrivs i det här avsnittet inaktiveras om Microsoft Jet Expression Service körs i begränsat läge, vilket förhindrar utvärderingen av potentiellt osäkra uttryck. Om du vill ha mer information om begränsat läge söker du efter "begränsat läge" i hjälpen.
Returnerar ett värde av datatypen Variant (Sträng) som representerar den aktuella sökvägen.
Syntax
CurDir[(enhet)]
Den valfria enhetenargument är en stränguttryck som anger en befintlig enhet. Om ingen enhet anges eller om enheten är en nollängdssträng (""), returnerar CurDir sökvägen för den aktuella enheten. På Macintosh ignorerar CurDir alla angivna enheter och returnerar helt enkelt sökvägen för den aktuella enheten.
Exempel
Obs!: I exemplen nedan visar vi hur du använder den här funktionen i en Visual Basic for Applications-modul (VBA). Om du vill läsa mer om hur man använder VBA, kan du välja Info för utvecklare i listrutan bredvid Sök och sedan skriva en eller flera söktermer i sökrutan.
I det här exemplet används funktionen CurDir för att returnera den aktuella sökvägen. På Macintosh-datorer ignoreras enhetsspecifikationer som ges till CurDir . Standardenhetsnamnet är "HD" och delar av sökvägen avgränsas med kolon i stället för omvända snedstreck. På samma sätt anges Macintosh-mappar i stället för \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 MyPathMyPath = CurDir ' Returns "C:\WINDOWS\SYSTEM".MyPath = CurDir("C") ' Returns "C:\WINDOWS\SYSTEM".MyPath = CurDir("D") ' Returns "D:\EXCEL".
