Macro Filtre pour colonne active

RioChrist Messages postés 2 Statut Membre -  
RioChrist Messages postés 2 Statut Membre -
Bonjour !

Petite question....
J'ai crée une macro très simple pour filtrer les cellules à zéro de la colonne C et ensuite d'enlever le filtre de cette même colonne.

ActiveSheet.Range("$A$2:$AD$76").AutoFilter Field:=3, Criteria1:="<>"
End Sub

ActiveSheet.Range("$A$2:$AD$76").AutoFilter Field:=3
End Sub

Je cherche à utiliser ces macros mais pour les colonnes que je décide d'analyser (colonne active). Exemple vérification de la colonne D ensuite la colonne E et ainsi de suite.

Merci de votre aide !

1 réponse

  1. Patrice33740 Messages postés 8400 Date d'inscription   Statut Membre Dernière intervention   1 784
     
    Bonjour,

    Essaies :
    Sub xx()
     ActiveSheet.Range("$A$2:$AD$76").AutoFilter Field:=ActiveCell.Column, Criteria1:="<>"
    End Sub
    
    Sub yy()
     ActiveSheet.Range("$A$2:$AD$76").AutoFilter Field:=ActiveCell.Column
    End Sub


    0
    1. RioChrist Messages postés 2 Statut Membre
       
      Un grand merci !!!!! Pas toujours facile pour une débutante avec les macros !!!!!
      0