Bonjours,
A l'ouverture d'un classeur j'utilise ce code :
With Feuil1.QueryTables(1)
.Refresh True
End With
qui me permet d'executer une "MAJ" d'une requête, dans un soucis
d'automisation à la fin de cette actualisation des données j'aimerai
sauvegarder mon classeur et le fermer automatiquement. Mons soucis est que si
je rajoute quelque chose du genre "ActiveWorkbook.Save" une boîte de message
s'ouvre en me disant que cette action va annuler l'actualisation, je voudrais
donc attendre la fin du "refresh" et après faire la sauvegarde, j'ai essayé
la fonction sleep mais celle si ne fait qu'interrompre le code pendant x
secondes et celui reprend en affichant le message... Quelqu'un a t-il une
idée pour me mettre sur la bonne voie ?
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Xavier
Je viens de trouver une solution qui est de remplacer ".refresh True " par ".Refresh BackgroundQuery:úlse" se qui permet d'attendre la fin de l'actualisation avant de continuer le reste du code
Merci quand même à ceux qui se seraient penchés sur ma question. -- Xavier.
Bonjours, A l'ouverture d'un classeur j'utilise ce code :
With Feuil1.QueryTables(1) .Refresh True End With
qui me permet d'executer une "MAJ" d'une requête, dans un soucis d'automisation à la fin de cette actualisation des données j'aimerai sauvegarder mon classeur et le fermer automatiquement. Mons soucis est que si je rajoute quelque chose du genre "ActiveWorkbook.Save" une boîte de message s'ouvre en me disant que cette action va annuler l'actualisation, je voudrais donc attendre la fin du "refresh" et après faire la sauvegarde, j'ai essayé la fonction sleep mais celle si ne fait qu'interrompre le code pendant x secondes et celui reprend en affichant le message... Quelqu'un a t-il une idée pour me mettre sur la bonne voie ?
Merci de votre aide
-- Xavier.
Je viens de trouver une solution
qui est de remplacer ".refresh True "
par ".Refresh BackgroundQuery:úlse" se qui permet d'attendre la fin de
l'actualisation avant de continuer le reste du code
Merci quand même à ceux qui se seraient penchés sur ma question.
--
Xavier.
Bonjours,
A l'ouverture d'un classeur j'utilise ce code :
With Feuil1.QueryTables(1)
.Refresh True
End With
qui me permet d'executer une "MAJ" d'une requête, dans un soucis
d'automisation à la fin de cette actualisation des données j'aimerai
sauvegarder mon classeur et le fermer automatiquement. Mons soucis est que si
je rajoute quelque chose du genre "ActiveWorkbook.Save" une boîte de message
s'ouvre en me disant que cette action va annuler l'actualisation, je voudrais
donc attendre la fin du "refresh" et après faire la sauvegarde, j'ai essayé
la fonction sleep mais celle si ne fait qu'interrompre le code pendant x
secondes et celui reprend en affichant le message... Quelqu'un a t-il une
idée pour me mettre sur la bonne voie ?
Je viens de trouver une solution qui est de remplacer ".refresh True " par ".Refresh BackgroundQuery:úlse" se qui permet d'attendre la fin de l'actualisation avant de continuer le reste du code
Merci quand même à ceux qui se seraient penchés sur ma question. -- Xavier.
Bonjours, A l'ouverture d'un classeur j'utilise ce code :
With Feuil1.QueryTables(1) .Refresh True End With
qui me permet d'executer une "MAJ" d'une requête, dans un soucis d'automisation à la fin de cette actualisation des données j'aimerai sauvegarder mon classeur et le fermer automatiquement. Mons soucis est que si je rajoute quelque chose du genre "ActiveWorkbook.Save" une boîte de message s'ouvre en me disant que cette action va annuler l'actualisation, je voudrais donc attendre la fin du "refresh" et après faire la sauvegarde, j'ai essayé la fonction sleep mais celle si ne fait qu'interrompre le code pendant x secondes et celui reprend en affichant le message... Quelqu'un a t-il une idée pour me mettre sur la bonne voie ?
