-
Set fso = CreateObject("Scripting.FileSystemObject") alternative for Mac?
I have the following code that syncs word.officeui across different computers. (written by a fellow Eileen's Lounge member).
It works wonderfully across different Windows computers, but the blue line below triggers an error on Mac.
Is there an alternative that I can use for Mac?
Sub AutoOpen()
Dim fso As Object
Dim strProfile1 As String
Dim strProfile2 As String
Dim strPath1 As String
Dim strPath2 As String
Dim fil1 As Object
Dim fil2 As Object
Set fso = CreateObject("Scripting.FileSystemObject")
strProfile1 = Options.DefaultFilePath(wdStartupPath)
strProfile2 = Environ("UserProfile")
strPath1 = strProfile1 & "\Word.officeUI"
Set fil1 = fso.GetFile(strPath1)
strPath2 = strProfile2 & "\AppData\Local\Microsoft\Office\Word.officeUI"
Set fil2 = fso.GetFile(strPath2)
If fil1.DateLastModified > fil2.DateLastModified Then
MsgBox ("Plesse Exit Word and Restart for User Setting Synchronization")
End If
End Sub
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules