Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

SAP Business Objects Discussion :

VBA macro et connexion à SAP


Sujet :

SAP Business Objects

  1. #1
    Candidat au Club
    VBA macro et connexion à SAP
    Bonjour à tous,

    J'utilise des macros pour automatiser certaines tâches sur mon logiciel d'entreprise SAP, j'ai actuellement une macro avec 6 onglets chacun dédié à une tâche précise avec 6 modules correspondants.
    Sur chaque module j'ai le code suivant pour établir la connexion à SAP :
    Code VBA :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    Dim application_SAP, SapGuiAuto, connection, session As Object
     
    'Connexion à SAP
     
    On Error Resume Next
    Set SapGuiAuto = GetObject("SAPGUI")
    Set application_SAP = SapGuiAuto.GetScriptingEngine
    Set connection = application_SAP.Children(0)
    Set session = connection.Children(0)
     
    If IsObject(WScript) Then
        WScript.ConnectObject session, "on"
        WScript.ConnectObject application_SAP, "on"
    End If
     
    If Err.Number <> 0 Then
        TextBox.Text = "Ouvrir une session SAP"
        Exit Sub
    End If
     
    On Error GoTo 0


    Serait-il possible d'exporter le code dans une procédure d'un nouveau module, appeler cette procédure dans mes modules existants afin de ne pas répéter le code à chaque fois ?

    Merci

  2. #2
    Membre éprouvé
    Bonjour

    Ce que tu demandes ici c'est de créer une subroutine non ?

    Créer une routine dite publique que tu placeras dans un module et, parce que publique, elle peut être appelée de n'importe quelle partie de ton fichier Excel.

    Bonne soirée.
    Christophe (cavo789)
    Mes scripts Open Source : https://github.com/cavo789

###raw>template_hook.ano_emploi###