XL 2016 Création Macro pour modifier des filtres

zendb

XLDnaute Junior
Bonjour à tous,

Je cherche à réaliser des macros me permettant de modifier à la volée les filtres de deux colonnes.

Macro 1 :
- sélectionner les cellules vides de la colonne A
- sélectionner les cellules qui commencent pas AMB dans la colonne B

Macro 2 :
- sélectionner les cellules vides de la colonne A
- sélectionner les cellules qui commencent pas CF dans la colonne B

Macro 3 :
- réinitialiser les filtres des colonnes A et B (tout afficher)

Sachant que le fichier d'origine s'étend sur les colonnes A et B et les lignes de 1 à 1125 (mais pouvant possiblement s'étendre)

Merci +++
 

Pièces jointes

  • Filtrage colonnes.xlsx
    8.9 KB · Affichages: 17

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Zendb,
Un essai en PJ avec :
VB:
Sub Macro1()
    Application.ScreenUpdating = False
    On Error Resume Next
    Worksheets(1).ShowAllData
    [A1].AutoFilter Field:=1, Criteria1:="="
    [A1].AutoFilter Field:=2, Criteria1:="=*AMB*", Operator:=xlAnd
    Application.ScreenUpdating = True
End Sub
Sub Macro2()
    Application.ScreenUpdating = False
    On Error Resume Next
    Worksheets(1).ShowAllData
    [A1].AutoFilter Field:=1, Criteria1:="="
    [A1].AutoFilter Field:=2, Criteria1:="=*CF*", Operator:=xlAnd
    Application.ScreenUpdating = True
End Sub
Sub Macro3()
    On Error Resume Next
    Worksheets(1).ShowAllData
End Sub
 

Pièces jointes

  • Filtrage colonnes.xlsm
    16 KB · Affichages: 20

Discussions similaires

Réponses
31
Affichages
1 K

Statistiques des forums

Discussions
311 722
Messages
2 081 930
Membres
101 843
dernier inscrit
Thaly