MacroFacili: Eseguire un script SAP da VBA

Un esempio base di come possa essere eseguito uno scrip registrato su SAP in VBA, la macro esegue la verifica che la finestra di SAP sia stata aperta.

Per poter utilizzare gli oggetti di SAP deve essere attivato il riferimento alla libreria SAP GUI Scripting API

Dalla finestra di VBA le voci di menù: Strumenti --> Riferimenti spuntando poi SAP GUI Scripting API
se non fosse presente nell'elenco si può inserire con il tasto Sfoglia scegliendo il file sapfewse.oxc che normalmente si trova a questo percorso C:\Program Files (x86)\SAP\FrontEnd\SAPgui

Sub SAP_EseguiScript()
  Dim SapObjGui As Object
  Dim SapObjApp As SAPFEWSELib.GuiApplication
  Dim SapObjConn As SAPFEWSELib.GuiConnection
  Dim session As SAPFEWSELib.GuiSession

  On Error Resume Next
  Set SapObjGui = GetObject("SAPGUI")
  If (SapObjGui Is Nothing) Then
    MsgBox "Deve essere avviato SAP per poter eseguire la macro."
    Exit Sub
  Else
    On Error GoTo 0
    Set SapObjApp = SapObjGui.GetScriptingEngine
    Set SapObjConn = SapObjApp.Children(0)
    Set session = SapObjConn.Children(0)

    '--- incollare qui la registrazione ---

    '--- fine registrazione ---
  End If
End Sub

L'esempio completo é scaricabile da questo link: Es353.xlsm (a questo link le info per attivare le macro se risultano bloccate)

Gli esempi contenuti nel sito sono per uso personale, non é consentito l'uso professionale, commerciale o la riproduzione senza autorizzazione.

Per dubbi o domande potete scriverci a domande@macrofacili.it, sulla nostra pagina FB MacroFacili.it o sul gruppo FB Excel, macro e formule.