Bonjour,

J'avais une macro sous Libre office mais je n'arrive pas à la mettre sous excel. Pouvez vous m'aider ?
Voici la macro Libre office :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
REM  *****  BASIC  *****
Sub MaJPilote
oDoc = thiscomponent
oFeuilleEnum = oDoc.sheets.createEnumeration
While oFeuilleEnum.hasMoreElements()
   oFeuille = oFeuilleEnum.nextElement()
   oPilotes = oFeuille.getDataPilotTables()
   oPiloteEnum = oPilotes.createEnumeration
   While oPiloteEnum.hasMoreElements()
      oPiloteElement = oPiloteEnum.nextElement()
       oPiloteElement.refresh
   Wend
Wend
End Sub
Cette macro sert à mettre à jour des données comptables pour la compta d'une association.

Merci