Bonjour,
j'utilise QueryTables pour obtenir des resultats de requetes sous Excel, tout fonctionne jusqu'à la 64ème requete.
Quelque soient les requetes effectuées par l'utilisateur, ça plante toujours à la 64ème requete en m'affichant:
Erreur d'execution '1004':
Erreur définie par l'application ou par l'objet
et le debogage se positionne sur le .Refresh de mon code ci-dessous:

Code : 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
 
Set appAccess = CreateObject("Access.application")
 
BOUCLE FOR blablabla
   MySql = "SELECT blablabla; "
       With ActiveSheet.QueryTables.Add(Connection:=Array( _
        "OLEDB;Provider=Microsoft.Jet.OLEDB.4.0;" _
        & "Data Source=" & Application.ActiveWorkbook.Path & "/base_blabla.mdb"), _
        Destination:=Cells(100, ColExcel))
        .CommandType = xlCmdSql
        .CommandText = MySql
        .Refresh
    End With
NEXT blabla
appAccess.Quit
Set appAccess = Nothing
Et des que je referme le fichier et que je reouvre le fichierapres cette erreur au bout de la 64eme requete, tout remarche ...jusqu'a ce que je reeffectue 64 requetes.
Comment faire?
MERCI !