MsgBox et actualisation Power Query
Salut,
J'ai une BDD excel qui est en lien avec d'autres fichiers comme "Devis". Je souhaites lorsque j'ouvre le fichier "Devis" que cela me demande si je veux actualiser et mettre à jour le fichier.
J'ai mis cela dans le VB :
Onglet ThisWorkbook :
Code:
1 2 3 4 5 6 7
| Private Sub workbook_open()
MsgBox ("Voulez-vous mettre à jour le fichier ?"), vbYesNo
If vbYes Then ActiveWorkbook.RefreshAll
If vbNo Then Exit Sub
End Sub |
Le problème, c'est que je fasses oui ou non, cela m'actualise tout automatiquement.
Avez-vous une solution ?
Merci par avance
@+