IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Attendre fin mise à jour requête pour poursuivre le programme


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2007
    Messages
    122
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations forums :
    Inscription : Décembre 2007
    Messages : 122
    Points : 68
    Points
    68
    Par défaut Attendre fin mise à jour requête pour poursuivre le programme
    Bonjour,

    Je recherche une solution pour que mon programme attende que l'action .RefreshAll soit terminée avant de continuer.

    L'action .RefreshAll permet aux requêtes situées dans mon fichier Iscala_Extract de se mettre à jour.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Public Sub OpenIscalaExtract()
     
    Set Iscala_Extract = GetObject(FilePathIscalaExtract)                                   'Chargement du fichier ISCALA_Extract
    Iscala_Extract.RefreshAll                                                                            'Mise à jour fichier ISCALA_Extract
     
    End Sub
    Auriez-vous connaissance d'une instruction particulière?

  2. #2
    Membre extrêmement actif
    Homme Profil pro
    aucune
    Inscrit en
    Avril 2016
    Messages
    7 563
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 82
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Avril 2016
    Messages : 7 563
    Points : 12 422
    Points
    12 422
    Par défaut
    Bonjour
    Regarde mon intervention dans la discussion récente suivante :
    https://www.developpez.net/forums/d1...ement-donnees/
    Elle est probablement ta solution.
    Je n'accepte pas de demande d' "amitié" individuelle. Tout développeur est pour moi un ami.
    Je n'ouvre AUCUN classeur tiers (avec ou sans macro ******). Ne m'en proposez donc pas .

    ****** : Non, non ... un classeur .xlsx ne "peut" par exemple et entre autres pas contenir un activex (de surcroît invisible) , "bien sûr" ...

    Il est illusoire de penser que l'on saurait exprimer valablement et précisément en un langage (rigide) de développement ce que l'on peine à exprimer dans le langage naturel, bien plus souple.

  3. #3
    Invité
    Invité(e)
    Par défaut
    Citation Envoyé par Jeanvaljean44 Voir le message
    Bonjour,

    Regardez dans l'aide en ligne si un DoEvents règlerait votre problème.

  4. #4
    Membre extrêmement actif
    Homme Profil pro
    aucune
    Inscrit en
    Avril 2016
    Messages
    7 563
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 82
    Localisation : France, Pyrénées Atlantiques (Aquitaine)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Avril 2016
    Messages : 7 563
    Points : 12 422
    Points
    12 422
    Par défaut
    Bonjour Eric
    Le Doevents reste dans cette affaire assez aléatoire du fait que le traitement de la requête se fait par défaut de manière asynchrone.
    En forçant un traitement synchrone, le problème ne se pose plus, puisque les instructions suivantes ne seront exécutées qu'après la fin de traitement de la requête.
    Je n'accepte pas de demande d' "amitié" individuelle. Tout développeur est pour moi un ami.
    Je n'ouvre AUCUN classeur tiers (avec ou sans macro ******). Ne m'en proposez donc pas .

    ****** : Non, non ... un classeur .xlsx ne "peut" par exemple et entre autres pas contenir un activex (de surcroît invisible) , "bien sûr" ...

    Il est illusoire de penser que l'on saurait exprimer valablement et précisément en un langage (rigide) de développement ce que l'on peine à exprimer dans le langage naturel, bien plus souple.

  5. #5
    Inactif  

    Homme Profil pro
    cuisiniste
    Inscrit en
    Avril 2009
    Messages
    15 379
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : cuisiniste
    Secteur : Bâtiment

    Informations forums :
    Inscription : Avril 2009
    Messages : 15 379
    Points : 12 075
    Points
    12 075
    Billets dans le blog
    8
    Par défaut re
    re
    bonjour
    Auriez-vous connaissance d'une instruction particulière?
    je dirais qu'il est possible qu'il y est une fonction "status" en lecture de ta requete surtout si tu a la fonction refresh all
    parti de la l'interrogation dans un do/loop est largement suffisant
    renseigne toi sur ce point
    mes fichiers dans les contributions:
    mail avec CDO en vba et mail avec CDO en vbs dans un HTA
    survol des bouton dans userform
    prendre un cliché d'un range

    si ton problème est résolu n'oublie pas de pointer : : ça peut servir aux autres
    et n'oublie pas de voter

  6. #6
    Membre averti
    Profil pro
    Inscrit en
    Février 2010
    Messages
    194
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 194
    Points : 378
    Points
    378
    Par défaut
    Bonjour,

    si ce n'est pas une requête vers access tu peux essayer une solution que j'ai publiée ici <---un petit clique vers le paradis un code exemple

    Et coïncidence je viens juste de lui ajouter un petit up.

  7. #7
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2007
    Messages
    122
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations forums :
    Inscription : Décembre 2007
    Messages : 122
    Points : 68
    Points
    68
    Par défaut
    Citation Envoyé par Eric KERGRESSE Voir le message
    Bonjour,

    Regardez dans l'aide en ligne si un DoEvents règlerait votre problème.
    J'ai déjà essayé le DoEvents et cela ne change rien tout comme lancé le .RefreshAll dans une procédure Auto_Open () du fichier concerné...

    Le fichier ISCALA_EXTRACT est un fichier Excel avec une requête de type SQL pointant vers un ERP.

  8. #8
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2007
    Messages
    122
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations forums :
    Inscription : Décembre 2007
    Messages : 122
    Points : 68
    Points
    68
    Par défaut
    Citation Envoyé par patricktoulon Voir le message
    re
    bonjour


    je dirais qu'il est possible qu'il y est une fonction "status" en lecture de ta requete surtout si tu a la fonction refresh all
    parti de la l'interrogation dans un do/loop est largement suffisant
    renseigne toi sur ce point
    Effectivement, lorsque la requête s'exécute un message apparaît dans la barre de "statut"! Mais je ne vois pas comment procéder avec un Do/Loop...

  9. #9
    Membre averti
    Profil pro
    Inscrit en
    Février 2010
    Messages
    194
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 194
    Points : 378
    Points
    378
    Par défaut
    Bonjour,

    bon je vais être un peu plus ferme !!!
    car en faite je ne sais pas pourquoi toute nouvelle personne qui essai d'utiliser les requêtes depuis excel cherche à savoir quand la requête se termine sans jamais vouloir utiliser le seul moyen existant dans excel et qui est l’événement AfterRefresh de la classe QueryTable d'excel !!! C'est dingue ! J'ai moi même pour des besoins de requêtes sur les bases de notre intranet(SAP, Winchill...), pour de la gestion de projet au boulot, chercher pendant longtemps comment faire. Hé les gens ! il va falloir l'admettre il n'y a que cette méthode qui reste efficace et robuste !!! Excel n'est pas fait pour cela à la base et donc y a pas de miracle ! Il n'y pas de solution simple. Il existe d'autre méthode encore plus compliqué et moins robuste par la mise en place par exemple d'un timer qui test le contenu d'une cellule "témoin". c'est tout aussi compliqué et moins robuste surtout si dans ce teste on intègre pas un test de connexion. Ce test excel ne sait pas le faire à la base !!! il faut passer par l' API InternetGetConnectedState de la librairie wininet.dll.

    Bref cela reste du bricolage !!!

    Mais bon Vous faite comme vous voulez !!!

  10. #10
    Membre du Club
    Homme Profil pro
    Inscrit en
    Décembre 2007
    Messages
    122
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Pas de Calais (Nord Pas de Calais)

    Informations forums :
    Inscription : Décembre 2007
    Messages : 122
    Points : 68
    Points
    68
    Par défaut
    Bonjour Phil Free,

    Citation Envoyé par Phil Free Voir le message
    Bonjour,

    bon je vais être un peu plus ferme !!!
    car en faite je ne sais pas pourquoi toute nouvelle personne qui essai d'utiliser les requêtes depuis excel cherche à savoir quand la requête se termine sans jamais vouloir utiliser le seul moyen existant dans excel et qui est l’événement AfterRefresh de la classe QueryTable d'excel !!! C'est dingue ! J'ai moi même pour des besoins de requêtes sur les bases de notre intranet(SAP, Winchill...), pour de la gestion de projet au boulot, chercher pendant longtemps comment faire. Hé les gens ! il va falloir l'admettre il n'y a que cette méthode qui reste efficace et robuste !!! Excel n'est pas fait pour cela à la base et donc y a pas de miracle ! Il n'y pas de solution simple. Il existe d'autre méthode encore plus compliqué et moins robuste par la mise en place par exemple d'un timer qui test le contenu d'une cellule "témoin". c'est tout aussi compliqué et moins robuste surtout si dans ce teste on intègre pas un test de connexion. Ce test excel ne sait pas le faire à la base !!! il faut passer par l' API InternetGetConnectedState de la librairie wininet.dll.

    Bref cela reste du bricolage !!!

    Mais bon Vous faite comme vous voulez !!!
    Je ne vois pas d’inconvénient à utiliser AfterRefresh, mais jusque là je n'ai jamais utiliser ce code et ne connais pas réellement la syntaxe
    Aurais tu un exemple à me partager?

  11. #11
    Membre averti
    Profil pro
    Inscrit en
    Février 2010
    Messages
    194
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 194
    Points : 378
    Points
    378
    Par défaut
    Bah

    j'ai posté un lien plus haut dans mon poste #6 <--- y a un lien aussi ici

Discussions similaires

  1. Mise à jour hardware pour FreeNAS
    Par Général03 dans le forum Composants
    Réponses: 6
    Dernier message: 10/10/2010, 16h45
  2. Réponses: 0
    Dernier message: 12/08/2009, 08h17
  3. Mise à jour => requête
    Par Djtito10 dans le forum Débuter
    Réponses: 1
    Dernier message: 26/09/2008, 11h02
  4. Réponses: 11
    Dernier message: 04/04/2008, 15h09
  5. mise à jour source pour TCD
    Par will-1981 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 04/04/2008, 14h18

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo