Geçici dosya adını mesaj olarak gösteren VBA kodu alternatifidir.
Option Explicit
Sub GeciciDosyaIsminiMesajOlarakGoster()
Dim fileSystemObject As Object
Dim dosya As String
Set fileSystemObject = CreateObject("Scripting.FileSystemObject")
dosya = fileSystemObject.GetTempName
MsgBox dosya
End Sub