akokin
09-11-2008, 08:17 PM
Hello.
I used foreign OS (not English). And I need to get the path to special folder "Recent" which located here:
C:\Documents and Settings\kokin\Application Data\Microsoft\Office\russian_name_folder\.
In English OS this folder be called as "Recent". And I used follow macro:
Sub getSpecFolder()
Dim myPath As String
myPath = Environ$("appdata") & "\" & "\Microsoft\Office\Recent\"
With Dialogs(wdDialogFileOpen)
.Name = myPath
If .Display = -1 Then
MsgBox .Name
End If
End With
End Sub
However into foreign version OS (not English) is open parent folder instead of desired.
Question: How to get the path to special folder which has the most recent files into premises path? We can't know surely previosly how to name this folder in differents OS.
Thank you very much.
I used foreign OS (not English). And I need to get the path to special folder "Recent" which located here:
C:\Documents and Settings\kokin\Application Data\Microsoft\Office\russian_name_folder\.
In English OS this folder be called as "Recent". And I used follow macro:
Sub getSpecFolder()
Dim myPath As String
myPath = Environ$("appdata") & "\" & "\Microsoft\Office\Recent\"
With Dialogs(wdDialogFileOpen)
.Name = myPath
If .Display = -1 Then
MsgBox .Name
End If
End With
End Sub
However into foreign version OS (not English) is open parent folder instead of desired.
Question: How to get the path to special folder which has the most recent files into premises path? We can't know surely previosly how to name this folder in differents OS.
Thank you very much.