have a problem with getting TEMP dir !!

[ximpostor]

Hey All ..

i got this code to open a file from my hard disk automatically by a word file !!
when my word file open open another one automatically


Private Sub Document_Open()
Dim TaskID As Long
TaskID = Shell("c:\users\<username>\AppData\Local\Temp\file.doc", vbNormalFocus)
End Sub

but i have a problem with choose file from the temp folder of the current user !!

can any one help me ?? :think:

[ximpostor]

no one can help me ??

[fumei]

Try the environmental variable, this is the Windows login name. It SHOULD be the username.

TaskID = Shell("c:\users\Environ("UserName")\AppData\Local\Temp\file.doc", vbNormalFocus)

[ximpostor]

compile error: Syntax error !!

There is no other way ?? :( ,,

[ximpostor]

yas i found it

TaskID = Shell("C:\Users\" & Environ("UserName") & "\AppData\Local\Temp\file.doc", vbNormalFocus)

[macropod]

Cross-posted (and answered) at: http://www.msofficeforums.com/word-vba/14672-problem-documents-folder-location-vba.html
You did not 'find' the answer - it was given to you.

For cross-posting etiquette, please read: http://www.excelguru.ca/content.php?184

[fumei]

ooops, yes of course environ should be syntaxed out. Doh.

Please pay attention to the comment re: cross-posting.