莲花笔记vba中的附件

Question

  

可能重复：
  Opening an Excel file attachment located in a Lotus Notes Database through VBA

我对vba比较陌生，并努力使用vba在Lotus notes数据库中的文档中打开一个excel附件。到目前为止，我已经开始使用下面的代码打开附件文件所在的链接，但无法打开该文件。任何建议将不胜感激

Sub Open_File()

Application.AutomationSecurity = msoAutomationSecurityLow
Application.DisplayAlerts = False
Application.ScreenUpdating = False
On Error Resume Next
AppActivate "Lotus Notes"
If Not Err.Number = 0 Then
Err.Clear
MsgBox "Notes is Not Running", vbInformation, "WSM-Marketing"
Else

Application.ActiveWorkbook.FollowHyperlink Address:="Notes://URL/File.xlsx", NewWindow:=True
wb.Activate


End If
Exit Sub
End Sub