to get the temp folder in VBA you can use the following snippet.

Sample VBA

Public Function GetTempFolder() As String
    GetTempFolder = Environ("Temp")
End Function