Discussion :

[MELINE]

Bonjour,

Je souhaite afficher dans un Etat un fichier Excel, dans lequel figure les résultats d’une requête, intégré grâce aux principes « d’automation » évoqué dans les tutoriaux . Avant l’ouverture de l’état je souhaite appliquer un filtre élaboré aux nouvelles données de mon fichier Excel. J’ai donc inséré la ligne de code suivante dans mon programme d’automation mais j’ai un bug sur ces lignes une fois sur deux lors de l’ouverture de mon état.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
   ' filtre élaboré
   With wbk.Sheets("sheet1")
      Columns("A:F").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets( _
      "CRITERES DE FILTRE AAA").Range("B3:F4"), CopyToRange:=Range("H1"), Unique:=False
 Columns("L:L").ColumnWidth = 11.29
    End With

Pourriez-vous m’aider à faire fonctionner ce code issu d’une macro excel. Peut-être faut-il déclarer certaines variables ?
Merci par avance.

[SfJ5Rpw8]

rajoute la ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Set Wbk = ThisWorkbook

pour mettre à jour variable Wbk...

ton classeur doit dans la feuille "Sheet1" contenir ton tableau de donnée , et dans la feuille "CRITERES DE FILTRE AAA" en B3:F4 les critéres de tris...