Rechercher : dans
Par :

Macro excel et mise à jour de données

Dernière réponse le 1 mar 2007 à 13:48:32 Gillou, le 28 fév 2007 à 18:23:10 
 Signaler ce message aux modérateurs

Bonjour,
Je voudrais savoir si l'un des vous connait la solution pour résoudre le problème suivant:
Dans un fichier Excel, j'ai créé 3 onglets: onglet 1, onglet 2 et onglet 3. Chacun des onglets contient des données qui sont récupérées par le biais d'une requête SQL. Pour mettre à jour les données, il me suffit simplement de cliquer sur le bouton "Refresh Data" dans chacun des onglets.
Je voudrais créer une macro qui me permettrait par le biais d'un raccourci clavier ou autre de rafraîchir les données de tous les onglets en une seule fois. Ce qu'il me manque, c'est le nom de la fonction en VBA qui corresponde à l'action manuelle de cliquer sur le bouton "Refresh Data". En effet, si je connais le nom de cette fonction, il me suffirait dans ma macro Excel de l'appeler 3 fois, sur onglet 1, onglet 2 et onglet 3.
Pourriez-vous m'aider s'il vous plaît?
Merci par avance pour votre aide,
Cordialement,
Gillou

Configuration: Windows XP
Firefox 2.0.0.2
Excel 2003

Meilleures réponses pour « macro excel et mise à jour de données » dans :
Excel - Mises en forme conditionnelles illimitées VoirMises en Forme Conditionnelles Illimitées Introduction Principe Code Fichier joint Introduction La Mise en Forme Conditionelle (ou MFC) permet d'appliquer, à une cellule ou à plusieurs cellules sélectionnées, différents formats qui...
Exécuter une macro VoirExécuter une macro Excel et Calc proposent plusieurs façons d’exécuter une macro : en la sélectionnant dans une liste, dans la boîte de dialogue Macro ; par un raccourci clavier ; en l’attachant à un bouton de la barre d’outils ; ...

1

Lupin.A, le 28 fév 2007 à 19:32:42
  • +1

Bonjour,

suggestion :

Sub Rafraichir()

    Dim Feuille As Worksheet
    
    For Each Feuille In Worksheets
        Selection.QueryTable.Refresh BackgroundQuery:=False
        'Selection.QueryTable.Refresh BackgroundQuery:=True
    Next Feuille
    
End Sub


Lupin

Répondre à Lupin.A

2

 Gillou, le 1 mar 2007 à 13:48:32

Bonjour,
Merci pour votre réponse!
Après d'autres recherches de mon côté, il est également possible de lancer la commande suivante:

ActiveWorkbook.RefreshAll

Merci en tout cas pour votre réactivité!
Cordialement,
Gillou

Répondre à Gillou
Collection CommentÇaMarche.net