RefreshAll

Fermé
MP - 25 juil. 2016 à 12:28
 Mp - 27 juil. 2016 à 13:09
Bonjour,

J'utilise la fonction (Si on peut appeler ca comme ca ..) refreshAll de la maniere suivante:

Sub updatedata()

Sheets("Data").Select
ActiveWorkbook.RefreshAll
MsgBox ("MAJ")

End Sub

Je remarque le message s affiche avant la mise a jour alors que je souhaite l'inverse.
Est ce aue auelau'un a une explication ?

NB : Mon but n'etant pas d afficher un message mais de faire des calculs par rapport aux donnees mises a jour, par consequent le fait que le rafraichissement de la feuille ne se fasse qu a la toute fin du programme m'empeche de derouler correctement mes calculs.

1 réponse

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
25 juil. 2016 à 23:18
Bonsoir MP, bonsoir le forum,

Peut être devrais-tu laisser le temps à excel de recalculer avant d'afficher le message. Re3arde le code ci-dessous (4 secondes d'attente) :

Sub updatedata()
Sheets("Data").Select
ActiveWorkbook.RefreshAll
Application.Wait (Now + TimeValue("0:00:4"))
MsgBox "MAJ"
End Sub

0
Merci thautheme

J'ai aussi trouvé une autre solution sur le net :
Aller dans données externes
Propriétés de la page de donnees et décocher activer l'actualisation en background

:)
Bonne journée !!
0