2017-05-29 74 views
0

如果這是一個基本問題,請高級致歉。我對這個社區和VBA很陌生。我在Word 2011中使用以下宏而沒有問題:在Word 2016 for Mac中使用「GrantAccessToMultipleFiles」數組功能

ActiveDocument.Save 

    On Error Resume Next 

    Dim saveName As String 
    saveName = ActiveDocument.FullName 
    saveName = Left(saveName, Len(saveName) - 5) & ".pdf" 

    ActiveDocument.SaveAs fileName:=saveName, _ 
     FileFormat:=wdFormatPDF 
End Sub 

我希望能夠在Word 2016 for Mac中使用它。我知道有沙箱限制導致每次我想要運行此宏時出現權限對話框。 IF我正確理解:一旦我授予特定文件夾的權限,該權限將被保存,並且在運行需要訪問該特定文件夾的宏時不會再次提示。所以,例如,我授權我的Dropbox文件夾。然而,作爲我的工作流程的一部分,我經常創建新的子文件夾,並且每個子文件夾(在我的Dropbox文件夾下)顯然都需要個人許可。

我在網上做了一些搜索,發現「GrantAccessToMultipleFiles」允許創建一個數組來授予文件權限,以便這些對話框不會出現。我的問題是:我可以以某種方式授予我的Dropbox文件夾和任何存在或隨後創建的子文件夾的權限?

+0

注意:避免使用「On Error Resume Next」,這可以消除任何錯誤,並且如果出現錯誤,您將不會收到任何消息。看看[VBA最佳實踐 - 錯誤處理](https://stackoverflow.com/documentation/excel-vba/1107/vba-best-practices/5411/error-handling),看看如何使用正確的錯誤處理代替。 –

回答

0

我認爲你不能。作爲解決方法,您可以將文件保存到UBF8T346G9.Office文件夾並通過applescript移動文件。它有點棘手但可行。

相關問題