XL 2013 [RESOLU] MAJ Office 2016 KB5002160 avec Microsoft.ACE.OLEDB.12.0

[JLE]

Bonjour à tous,

Sous Excel 2013 depuis la dernière MAJ d'office KB5002160 (Lien) d'hier, le provider Microsoft.ACE.OLEDB.12.0, il se produit une erreur de connexion : "La méthode open de l'objet _connection a échoué"

La macro complète :

Sub dh()

Dim Source As Object, Requete As Object
Dim onglet As String, Plage As String, Fichier As String
Dim texte_SQL As String
Fichier = "L:\CP.xls"
onglet = "CodeRép"
Plage = "A1:H10"

Set Source = CreateObject("ADODB.Connection")

Source.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Fichier & ";Mode=Read" & ";Extended Properties=""Excel 12.0;HDR=YES;"""
texte_SQL = "SELECT * FROM [" & onglet & "$" & Plage & "] WHERE " & plagerecherché & " LIKE " & valrecherche  '& "ORDER BY [" & onglet & "$" & plagerecherché & "] desc"
Set Requete = CreateObject("ADODB.Recordset")
Set Requete = Source.Execute(texte_SQL)

remplaceusername = Requete.GetRows

Set Requete = Nothing
Set Source = Nothing

End Sub

Et les référence ci-jointe indiquée.

J'ai essayé de remplacé la version du moteur 12.0 par 15.0 mais dans certains cas ça ne passe pas (la macro de base est déclinée pour d'autres macro...)

Quelqu'un a t il eu ce problème ?

Merci pour vos réponses.

 

[JLE]

Re,

Je me réponds à moi même, il faut réparer Office et ça fonctionne.

Ce serait dû à bug de la maj qui passe mal.

A+