ファイルを開くときにメッセージが表示されないようにするには、VBAを使用する方法？

Question

私は多数のファイルを開き、それらをリフレッシュしてから保存して閉じるマクロを作成しています。すべてがスムーズに実行されていますが、ファイルを開くと2つのファイルが表示され、「ファイルがインクルードリストで実行されています - タイトルが表示されない」というメッセージが表示されます。これは "ok"が押されるまでマクロを停止させます。前に "Application.DisplayAlerts = False"を使用しましたが、ここでは動作していないようです。私のコードは次のとおりです：

Public Sub Refresh_All() 

Dim filepathstr As String 
Dim filename As String 
Dim wbk As Workbook 

filepathstr = Sheet1.Range("filepath").Value 

For Each cell In Sheet1.Range("workbooks") 

If Not cell.Value = "" Then 

    filename = cell.Value 
    Application.DisplayAlerts = False 
    Set wbk = Workbooks.Open(filepathstr & filename, False) 


    ''''**REFRESH**'''''' 
    SAPBexrefresh (True) 

    Application.DisplayAlerts = False 
    wbk.Save 
    wbk.Close False 
    Application.DisplayAlerts = True 

End If 

Next cell 

MsgBox "The Macro has finished; BW Reports are refreshed." 


End Sub 

ご協力いただければ幸いです！

Answer 1

、代わりに使用WB、その後戻ってtrueに設定し

を開く前に

Application.EnableEvents=False 

を追加します。

Application.AutomationSecurity=msoAutomationSecurityForceDisable 

が戻って、ユーザーが持っているものにセットすることを忘れないでくださいを...