Office
Logga in

Funktionen CurDir

Obs!: Vi vill kunna erbjuda dig bästa möjliga supportinnehåll så fort som möjligt och på ditt språk. Den här sidan har översatts med hjälp av automatiserad översättning och kan innehålla grammatiska fel eller andra felaktigheter. Vår avsikt är att den här informationen ska vara användbar för dig. Vill du berätta för oss om informationen är till hjälp längst ned på sidan? Här är artikeln på engelska som referens.

Obs!: Den funktion, den metod, det objekt eller den egenskap 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 en Variant (sträng) som representerar den aktuella sökvägen.

Syntax

CurDir [(enhet)]

Valfri enhetargument är stränguttryck som anger en befintlig enhet. Om ingen enhet anges eller om enheten är en nollängdssträng (””), CurDir returnerar sökvägen för den aktuella enheten. På Macintosh CurDir ignorerar valfri enhet angivna och helt enkelt returnerar 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.

Det här exemplet används funktionen CurDir för att returnera den aktuella sökvägen. På Macintosh ignoreras enhet specifikationerna till CurDir . Enheten standardnamnet är ”HD” och delar av sökvägen avgränsas med kolon i stället för omvända snedstreck. På samma sätt anger du 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 MyPath
MyPath = CurDir ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("C") ' Returns "C:\WINDOWS\SYSTEM".
MyPath = CurDir("D") ' Returns "D:\EXCEL".
Utöka dina Office-kunskaper
Utforska utbildning
Få nya funktioner först
Anslut till Office Insiders

Hade du nytta av den här informationen?

Tack för din feedback!

Tack för din feedback! Det låter som att det kan vara bra att koppla dig till en av våra Office-supportrepresentanter.

×