Excel OLAP Cubes - modif de la source

Salut a tous,

Me voici en possession plusieurs fichier *.oqy (MS Excel OLAP Query File) qui sont utilisés sous forme de PivotTable dans un fichier Excel (sous plusieurs onglets).

Voila maintenant ce que contient mon fichier *.oqy (ouvert sous Notepad)

Citation:

---

QueryType=OLEDB
Version=1
CommandType=Cube
Connection=Provider=MSOLAP; Initial Catalog=[OCWCube]; Data Source=C:\data\crm\expectedClosing.cub;

---

Existe t-il une solution pour changer la valeur de Data Source rapidement dans VBA de tous ces fichier *.oqy (qui sont dans un seul repertoire) ?

Merci d'avance

Mario

Ou au moins de 1 fichier ?

bonjour,
Si je comprend bien tu veux remplacer data\crm par autre chose, A-tu essayé avec la fonction d'édition Replace dans l'IDE de VBA
A+

Oui ce serait la fin de mon code.
Ce que je demande plutot est comment acceder a cette valeur "C:\data\crm\expectedClosing.cub" dans VBA ?

En sachant que c'est le DataSource du fichier *.oqy ...

Hello,

ouvre ton fichier .qry par le code comme un fichier texte (fso ou bon vieux Open) et recherche une chaine comprise entre "Data source=" et ";"