Définition du recordset d'un pivotcache

Signaler
Messages postés
1
Date d'inscription
samedi 20 mai 2006
Statut
Membre
Dernière intervention
27 novembre 2006
-
Messages postés
12
Date d'inscription
dimanche 29 mars 2009
Statut
Membre
Dernière intervention
4 avril 2009
-
Bonjour,





Je cherche à créer un recordset ADO déconnecté par une fonction appelée
dans le code ci-dessous "ImportRecordset" (jusque là, ça fonctionne),
puis à utiliser le recordset obtenu pour alimenter un objet pivotcache
et batir un tableau croisé. Malheureusement, VB6 m'indique l'erreur
suivante : Run-time error -2147217891 (80040e1d) Method 'Recordset' of object 'Pivotcache' failed.


En parcourant longuement l'aide d'Excel et le web, j'ai pourtant
l'impression (vraisemblablement trompeuse) que mon code est conforme...
Une âme charitable peut-elle m'aider ? Par avance, merci.


Dim rs As ADODB.Recordset, pc As Excel.PivotCache

Set rs = ImportRecordset    (ImportRecordset est ma fonction qui renvoie un object recordset déconnecté ouvert)

MsgBox rs.RecordCount  (cette ligne me permet juste de vérifier
que le recordset est correctement créé. Effectivement, il compte "un
certain nombre" d'enregistrements)

Set pc = myXL.Workbooks(1).PivotCaches.Add(SourceType:=xlExternal)

Set pc.Recordset = rs       (=> plantage)


Encore merci !

1 réponse

Messages postés
12
Date d'inscription
dimanche 29 mars 2009
Statut
Membre
Dernière intervention
4 avril 2009

s'il vous plait pouviez vous me dire à koi sert ce recordset et ou on peut le definir ou le declarer et merci d'avance