paildukkha
New Member
- Joined
- Mar 10, 2014
- Messages
- 8
Is there a way through vba I can hit OK or press enter in an external app?
Sub GetBOData()
Dim BOApp As Object
On Error Resume Next
Set BOApp = CreateObject("BusinessObjects.application")
With BOApp
.Visible = True
.LoginAs "aaaaa", "Xxxxx"
.Documents.Open ("C:\Users\abhpatil\Documents\My Business Objects Documents\userDocs\Test.rep")
With .ActiveDocument.Refresh
End With
End With
Set BOApp = Nothing
Set BODoc = Nothing
End Sub
Sub GetBOData()
Dim BOApp As Object
On Error Resume Next
Set BOApp = CreateObject("BusinessObjects.application")
With BOApp
.Visible = True
.LoginAs "aaaaa", "Xxxxx"
.Documents.Open ("C:\Users\abhpatil\Documents\My Business Objects Documents\userDocs\Test.rep")
With .ActiveDocument.Refresh
End With
End With
Set BOApp = Nothing
Set BODoc = Nothing
End Sub