Bonjour,
Tout d'abord un cordial salut à jbf et Pys (ainsi qu'à tous les abonnés de la
liste :) )
- soit un fichier Calc
- dans lequel on définit un pilote (ou ou plus) qui fonctionne plus ou moins de
façon attendue (l'actualisation ne se fait pas en mode Calc, si on ajoute de
données dans la plage source)
- passage en mode macro pour y coller un Dude_Inside :
Sub MaJPilote
Dim monDetailFiltre(0) as new com.sun.star.sheet.TableFilterField
oDoc = thiscomponent
oFeuilleEnum = oDoc.sheets.createEnumeration
While oFeuilleEnum.hasMoreElements()
oFeuille = oFeuilleEnum.nextElement()
oPilotes = oFeuille.getDataPilotTables()
IF oPilotes.Count = 0 Then msgBox "Pas de pilote", 32, oFeuille.Name
oPiloteEnum = oPilotes.createEnumeration
While oPiloteEnum.hasMoreElements()
oPiloteElement = oPiloteEnum.nextElement()
oPiloteElement.refresh
Wend
Wend
End Sub
oPilotes.Count renvoie 0, confirmé si besoin est par XRay. (@ Pys : help !
Qu'ai-je zappé ?)
J'ai le même résultat sous OOo 3.2.1 et sous LO 3.4.1 (au choix le 3.x.x ou le
x.x.1 me maudit...)
Cordialement
Churay
--
Envoyez un mail à [email protected] pour savoir comment vous
désinscrire
Les archives de la liste sont disponibles à
http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne
pourront pas être supprimés
