Actualiser avant d'enregistrer et fermer un fichier excel en VBA [Fermé]

Signaler
Messages postés
3
Date d'inscription
jeudi 10 août 2017
Statut
Membre
Dernière intervention
11 août 2017
-
Messages postés
3
Date d'inscription
jeudi 10 août 2017
Statut
Membre
Dernière intervention
11 août 2017
-
Bonjour les amis,

je souhaite rectifier mon code en VBA qui normalement me permet d'ouvrir un autre fichier excel calcule.xlsx l'actualiser par la suite le sauvegarder et le fermer, le code que j'ai est le suivant :

Sub Test()
Dim wb As Workbook
Dim ws As Worksheet
Set wb = Workbooks.Open("C:\Calcule.xlsx")
Set ws = wb.Worksheets(1)
wb.Save
wb.Close
End Sub


l'actualisation se fait automatiquement à l'ouverture du fichier calcule.xlsx par power query à partir d'un autre fichier le souci c'est que le code sauvegarde et ferme le fichier avant que celui-ci ne soit actualiser, donc il me faut le code qui me permet d'attendre la fin de l'actualisation et ensuite sauvegarder et fermer.
Merci d'avance :)

3 réponses

Messages postés
8169
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
10 août 2020
1 445
Bonjour

Avant le save, ajoutes
ws.Calculate


Messages postés
3
Date d'inscription
jeudi 10 août 2017
Statut
Membre
Dernière intervention
11 août 2017

Merci Bcp mais ça ne passe pas il sauvgarde et ferme avant de calculer ou actualiser :(
Messages postés
8169
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
10 août 2020
1 445
Et avec :
Set wb = Workbooks.Open(Filename:="C:\Calcule.xlsx", UpdateLinks:=3)
Messages postés
3
Date d'inscription
jeudi 10 août 2017
Statut
Membre
Dernière intervention
11 août 2017

Non toujours pas :(