str_tmppath = Environ("temp")
См. http://www.mrexcel.com/forum/excel-questions/240975-get-path-temp-folder.html