Verilen tam yolun sonuna isim ekleyerek başka bir tam yola dönüştüren VBA kodudur.
Option Explicit
Sub TamYolunSonunaIsimEkle()
Dim fso As Object
Dim yol As String
Set fso = CreateObject("Scripting.FileSystemObject")
yol = fso.BuildPath("D:\Dosyalar", "Raporlar")
MsgBox yol
End Sub