הערה: הפונקציה, פעולת השירות, האובייקט או המאפיין המתוארים בנושא זה אינם זמינים אם שירות הביטויים של Microsoft Jet פועל במצב ארגז חול (Sandbox) שמונע הערכה של ביטויים שעלולים להיות לא בטוחים. לקבלת מידע נוסף על מצב ארגז חול, חפש את "מצב ארגז חול" בעזרה.
החזרת משתנה (מחרוזת) המייצג את הנתיב הנוכחי.
תחביר
CurDir[(drive)]
הכונן האופציונליארגומנט הוא ביטוי מחרוזת מציין כונן קיים. אם לא צוין כונן או אם כונן הוא מחרוזת באורך אפס (""), CurDir מחזירה את הנתיב עבור הכונן הנוכחי. ב- Macintosh, CurDir מתעלם מכל כונן שצוין ופשוט מחזיר את הנתיב עבור הכונן הנוכחי.
דוגמה
הערה: הדוגמאות הבאות מדגימות את השימוש של פונקציה זו במודול Visual Basic for Applications (VBA). לקבלת מידע נוסף אודות עבודה עם VBA, בחר הפניית מפתח ברשימה הנפתחת שליד חיפוש והזן מונח אחד או יותר בתיבת החיפוש.
דוגמה זו משתמשת בפונקציה CurDir כדי להחזיר את הנתיב הנוכחי. ב- Macintosh, המערכת מתעלמתממפרטי כונן שניתנו ל- CurDir. שם כונן ברירת המחדל הוא "HD" והחלקים של שם הנתיב מופרדים באמצעות נקודתיים במקום בקו נטוי הפוך. באופן דומה, עליך לציין תיקיות Macintosh במקום \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".
