Funktionen CurDir

Bemærk: Den funktion, metode, objekt eller egenskab, som beskrives i dette emne er deaktiveret, hvis Microsoft Jet-udtrykstjenesten er i sandkassetilstand, der forhindrer evaluering af udtryk, der muligvis ikke er sikre. Yderligere oplysninger om sandkassetilstand finder du i Hjælp ved at søge på "sandkassetilstand".

Returnerer en Variant (String), der angiver den aktuelle sti.

Syntaks

CurDir[(drive)]

Det valgfrie argumentdrive er et strengudtryk, der angiver et eksisterende drev. Hvis der ikke er angivet et drev, eller hvis drive er en streng med længden nul (""), returnerer funktionen CurDir stien for det aktuelle drev. På Macintosh ignorerer funktionen CurDir et angivet drev og returnerer ganske enkelt stien for det aktuelle drev.

Eksempel

Bemærk: I de følgende eksempler demonstreres brugen af denne funktion i et VBA-modul (Visual Basic for Applications). Du kan få yderligere oplysninger om arbejde med VBA ved at vælge Udviklerreference på rullelisten ud for Søg og indtaste et eller flere udtryk i søgeboksen.

I dette eksempel anvendes funktionen CurDir til at returnere den aktuelle sti. På Macintosh ignoreres de specifikationer af drev, som angives for CurDir. Standarddrevnavnet er “HD”, og stinavnet dele adskilles af koloner i stedet for omvendte skråstreger. På samme måde ville du angive Macintosh-mapper i stedet for \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".
Del Facebook Facebook Twitter Twitter Mail Mail

Var disse oplysninger nyttige?

Fantastisk! Har du mere feedback?

Hvordan kan vi forbedre det?

Tak for din feedback!

×