Import de données Excel dans Access

Bonjour a tous,

Je doit importer certaines informations provenant de document excel dans un projet access, rien de bien méchant.

Mais je n'est pas retoucher à VBA access depuis quelques années et j'ai un petit problème dès la première ligne.

Private Sub Commande5_Click()

    Dim AppExcel As Excel.Application
    Dim wbFile As Excel.Workbook
    
    Set AppExcel = CreateObject("Excel.Application")  ' Ouverture d'excel
    If Not AppExcel Is Nothing Then
            
        Set wbFile = AppExcel.Workbooks.Open("D:\export_excel\05118_Fiches_action_thème A_251108.xls", False, True)
        'Ouverture du classeur
        If Not wbFile Is Nothing Then

            MsgBox (Cells(6, 7).Value)

            wbFile.Close
            AppExcel.Application.Quit
            Set AppExcel = Nothing
            Set wbFile = Nothing

        End If
    End If

End Sub

Je reçoit une erreur sur l'ouverture de l'application Excel (en gras) : "Type défini par l'utilisateur non défini"
Quelqu'un pourrait il éclairer ma lanterne SVP.

Merci
Matthieu E.