Dosya ismini hafızaya almaya yarayan VBA kodudur.
Option Explicit
Sub DosyaIsminiHafizayaAl()
Dim fileSystemObject As Object
Dim dosya As Object
Set fileSystemObject = CreateObject("Scripting.FileSystemObject")
Set dosya = fileSystemObject.GetFile("C:\OrnekKlasor\CalismaKitabi.xlsx")
MsgBox dosya
End Sub