OVH Cloud OVH Cloud

refresh de query

1 réponse
Avatar
Moureau Laurent
Bonjour à tous ,

J'ai un classeur Excel dans lequel il y a 2 feuilles.
Dans chaque feuille du classeur j'ai une requete msquery;

Sur la feuille 1 je crée un bouton qui permet de mettre à jour les requetes
de chaque feuille voici le code:

Sheets("Feuil1").Range("A1").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("Feuil2").Range("A1").Select
Selection.QueryTable.Refresh BackgroundQuery:=False

Lorsque j'arrive à la ligne Sheets("Feuil2").Range("A1").Select j'ai le
message d'erreur suivant

La méthode select de la classe range a échoué (comprend pas Pq)

Je suis pourtant obligé de me positionner dans le range de la requete pour
actualiser les données

Merci de votre aide.

--
!!!!ANTISPAM!!!!

Cliquez sur le lien pour répondre

http://cerbermail.com/?YFShDEWIbx

1 réponse

Avatar
isabelle
bonjour Laurent,

si c'est un bouton de la barre d'outils commande, il faut mettre sa propriété TakeFocusOnClick à false, sinon essaie en
remplacant cette commande en deux commande,

Sheets("Feuil2").Activate
Range("A1").Select

isabelle


Bonjour à tous ,

J'ai un classeur Excel dans lequel il y a 2 feuilles.
Dans chaque feuille du classeur j'ai une requete msquery;

Sur la feuille 1 je crée un bouton qui permet de mettre à jour les requetes
de chaque feuille voici le code:

Sheets("Feuil1").Range("A1").Select
Selection.QueryTable.Refresh BackgroundQuery:úlse
Sheets("Feuil2").Range("A1").Select
Selection.QueryTable.Refresh BackgroundQuery:úlse

Lorsque j'arrive à la ligne Sheets("Feuil2").Range("A1").Select j'ai le
message d'erreur suivant

La méthode select de la classe range a échoué (comprend pas Pq)

Je suis pourtant obligé de me positionner dans le range de la requete pour
actualiser les données

Merci de votre aide.

--
!!!!ANTISPAM!!!!

Cliquez sur le lien pour répondre

http://cerbermail.com/?YFShDEWIbx