Dosya Yolu ve İsmini Almak (Path / Name)

ThisWorkbook.Path

Dosyayı C'den D'ye de taşısanız, kodun her zaman kendi klasöründeki alt dosyalara ulaşabilmesini sağlar.

VBA Kodu:

Sub YolBul()
    MsgBox "Bu dosya şu an burada çalışıyor: " & ThisWorkbook.Path
End Sub

Ne Göreceksiniz? Dosyanın bulunduğu tam bilgisayar dizini (Örn: C:UsersMasaustu) mesaj olarak belirecektir.