Bjr,
J'ai le code suivant :En fait je désire realiser un refresh en selectionnant pour toutes les feuilles du classeurs une cellule et en réalisant l'action refresh.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Sub Macro4() ' ' Macro4 Macro ' Macro enregistrée le 20/12/2005 par pommbe01 ' Dim LaFeuille As Excel.Worksheet Set MesfeuillesTest = Workbooks("REPORTING.xls").Worksheets For Each LaFeuille In MesfeuillesTest Cells(2, 1).Select Next Selection.QueryTable.Refresh BackgroundQuery:=False End Sub
Le probleme est que mon code ne focntionne pas.
Comment faire pour obtenir l'action que je désire réaliser??
Merci
Partager