XL2007 cube analysis

VB23 Messages postés 46 Date d'inscription mercredi 4 avril 2007 Statut Membre Dernière intervention 10 décembre 2007 - 8 août 2007 à 16:20
VB23 Messages postés 46 Date d'inscription mercredi 4 avril 2007 Statut Membre Dernière intervention 10 décembre 2007 - 20 août 2007 à 16:08
Bonjour je souhaite me connecter a une source de donnée cube et ensuite creer mon tableau croisé

Manuellement et en enregistrer une macro ca fonctionne
quand je relance la macro enregistré ca bug

voici le code :
ActiveWorkbook.PivotCaches.Create(SourceType:=xlExternal, SourceData:= _
        ActiveWorkbook.Connections("localhost HBP DTHALES"), Version:= _
        xlPivotTableVersion12).CreatePivotTable TableDestination:="Feuil1!L1C1", _
        TableName:="tete", DefaultVersion:= _
        xlPivotTableVersion12

si je separe en deux

ActiveWorkbook.PivotCaches.Create(SourceType:=xlExternal, SourceData:= _
        ActiveWorkbook.Connections("localhost HBP DTHALES"), Version:= _
        xlPivotTableVersion12)            'Fonctionne

ActiveWorkbook.PivotCaches(1).CreatePivotTable TableDestination:="Feuil1!L1C1", _
        TableName:="tete", DefaultVersion:= _
        xlPivotTableVersion12   'bug

je prend tous tutorial, exemple de codes etc ou site pour mieux m'informer des methodes de connection ...

1 réponse

VB23 Messages postés 46 Date d'inscription mercredi 4 avril 2007 Statut Membre Dernière intervention 10 décembre 2007
20 août 2007 à 16:08
ok bah pour ceux que ca interesse il suffit de passer sous vb6 et pas Vba et ca fonctionne
si quelqu'un a reussi sous vba je suis preneur
0
Rejoignez-nous