Bonjour

Depuis le passage à la version 64 bits d'Excel, la macro ci-dessous ne fonctionne plus
Merci de votre aide

Erreur : Erreur d'exécution 2147221164 (80040154) - Classe non enregistrée
C'est la ligne en rouge ci-dessous "Set autECLSession = New AutSessTypeLibrary.AutSess"
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Option Explicit
Public autECLSession As AutSessTypeLibrary.AutSess
Dim zone_ecran As String

Private Sub macro_Click()
Set autECLSession = New AutSessTypeLibrary.AutSess
autECLSession.SetConnectionByName ("A") 'correspond à l'émulation 3270 écran A
zone_ecran = autECLSession.autECLPS.GetText(1, 72, 7)
Range("B2") = zone_ecran
autECLSession.autECLOIA.WaitForAppAvailable
End Sub