XL 2016 VBA afin d'utiliser un Add-in

  • Initiateur de la discussion Initiateur de la discussion Karim48
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Karim48

XLDnaute Nouveau
Bonjour,

Dans le fichier Excel ci-joint j'ai importé un add-in que j'aimerai automatiser par VBA:

1623080907846.png


Dans l'idée, je souhaiterais via la macro appeler l'add-in, compléter le "nom d'utilisateur" ainsi que "le mot de passe", me connecter et "sauvegarder les données ans...". Le hic c'est que lorsque je lance l'enregistreur de macro, il me ressort ainsi

1623081305777.png


J'ai également essayé cela :

[Public Sub Connect_COM_AddIn()

Application.COMAddIns("SAPBusinessByDesignExcelAddIn").Connect = True

End Sub]

Mais rien n'y fait. Débutant en VBA, je désespère pour le coup.

Merci d'avance pour votre aide.

Cordialement.

Karim
 
Merci.

Si je me trompe pas, le bout de code qui me concerne serait celui-ci

<
'Function to find the SAP bydesign Excel Add-in from Installed COM Add-ins
Private Function initialize() As Boolean
Dim comaddin As comaddin
For Each comaddin In Application.COMAddIns
If comaddin.progID = SHIPPED_ADDIN_PROGID And comaddin.Connect Then
Set addin = comaddin.Object
'Call your Desired Function
Dashboard
initialize = True
Exit Function
End If
Next comaddin

For Each comaddin In Application.COMAddIns
If comaddin.progID = DEBUG_ADDIN_PROGID And comaddin.Connect Then
Set addin = comaddin.Object
DashBoard
initialize = True
Exit Function
End If
Next comaddin

If addin Is Nothing Then
feedback "addin not found"
initialize = False
End If

End Function>

mais je me retrouve avec ce message lorsque je veux l'utiliser

1623089174928.png


Et je m'y perds un peu pour être honnete.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour