Discussion :

[kiki.gaby]

Bonsoir à tous,

Excel 2003.

J'ai trouvé dans la FAQ le code suivant que j'ai adapté pour qu'il s'exécute à l'ouverture du fichier :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Sub auto_open()
'ThisWorkbook.XmlMaps(2).DataBinding.Refresh
ThisWorkbook.XmlMaps("données graphique").DataBinding.Refresh
 
End Sub

Malheureusement la feuille excel (Feuil1) n'est pas mise à jour.

Mon souhait et de faire l'actualisation automatiquement à l'ouverture du fichier au lieu de faire clic droit sur la zone mappée puis de cliquer sur " xml " puis sur " actualiser les données xml".

Quelqu'un à t'il une idée ?

Merci d'avance.

[Qwazerty]

Salut
Auto_Open ?
Est ce une procédure que tu appelles ensuite dans ThisWorkBook_Open ?
A++
Qwaz

[kiki.gaby]

Bonjour Qwazerty,

J'ai mis ce code via Microsoft Visual Basic dans "Microsoft Excel Objets" et dans "Feuil1" et cela ne fonctionne pas.

Je viens d'essayer ce code avec un bouton il fonctionne.

Je souhaite que ce code s'exécute automatiquement à l'ouverture du fichier.

[Krovax]

Met le dans ThisWorkbook (et non feuil1)
et appelle le

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub Workbook_open()

[kiki.gaby]

Bonjour Krovax,

Je viens d'essayer tes instructions et j'obtiens un message d'erreur qui est le suivant :

Nom ambigu détecté : Workbook_open

As-tu une idée de cette erreur ?

[Krovax]

Oui tu doit avoir 2 subroutines qui porte se nom
Du coup il te suffit de mettre ton code dans celle qui existe déjà

[kiki.gaby]

Voici le code dans son intégralité

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
Private Sub Workbook_open()
ThisWorkbook.XmlMaps("données graphique").DataBinding.Refresh
End Sub

[kiki.gaby]

Effectivement le code se trouvait ailleurs j'ai tout supprimé et cela fonctionne.

Merci de tes précieux conseils Krovax.