Business ObjectsがExcelから起動

Question

VBAを使用して自分用にBusiness Objectsマクロを作成する処理中です。私はこのコードと他のものがどこでもフォーラムで同様のものを見つけました。しかし、これをVBAでコンパイルすると、Set BoAppステージですべてが凍結し始めます。オブジェクトの作成に何か不足していますか？ BusinessObjects.applicationは、Business Objectsディレクトリに固有の何か他のことを言いますか？

ご協力いただきましてありがとうございます。

Sub Open_Reports() 
    Dim BoApp As Object 

Application.DisplayAlerts = False 
Application.Wait (Now + TimeValue("1:00:00")) 

On Error Resume Next 
Set BoApp = CreateObject("BusinessObjects.application") 
With BoApp 
    .Visible = True 
    .LoginAs "username", "password", , "DVBOCEN-APP01" 
    .documents.Open ("Q:\MI Reporting (BAU)\BAU Daily\Operational Reports\All reports\Sales - Advisor - Daily.rep") 
     With .Activedocument 
       .Refresh 
       .Close 
     End With 
    .Application.Quit 
End With 

Set BoApp = Nothing 

ThisWorkbook.Saved = True 
.Quit 

End Subの

Answer 1

ないそれがお手伝いします場合は必ず、それはどちらかのように動作しますが、試してみてください以来：

Dim BoApp As busobj.Application 

と

Set BoApp = New busobj.Application 

私が想定していますDeskIアプリケーションを手動で正常に起動することができ、BusinessObjects x Object Libraryを参照として追加したことになります？