Filtre et remplacement de données dans macro...

[sadia]

Bonjour,

Je suis en train de faire une macro, et je bloque sur un tit probleme !
je fais un filtre sur la colonne "F" je prends tous les mots qui commence par "CG*"
jusque là tout va bien...
une fois le tri fait, je veux que toutes les données de la colonne "A" se transforme en 0

et là, je bloque total car si je remplace à la mano pour les autres fois ca va pas aller si les données de la colonne "F" changent.

je vous remercie pour votre aide !!!!!!!!

 

[Softmama]

Re : Filtre et remplacement de données dans macro...

Bonjour,

Quand tu crées un filtre, Excel génère automatiquement une plage qu'il appelle _FilterDataBase. Il te suffit de l'utiliser ainsi :

Private Sub CommandButton1_Click()
    With Range("F11")
        'place un filtre
        .AutoFilter Field:=6, Criteria1:="=CG*", Operator:=xlAnd '
        
        'Met les 0 à l'intersection de la colonne A9:A19 et de la zone filtrée visible
        Intersect(Range("_FilterDataBase").SpecialCells(xlVisible), Range("A9:A19")) = 0
        
        'Enlève le filtre
        .AutoFilter
    End With
End Sub

cf. fichier joint

 

[Arpette]

Re : Filtre et remplacement de données dans macro...

Bonjour, ton fichier en retour "feuil2", je supprime les lignes, peut-être souhaites tu les garder.
@+

 

[sadia]

Re : Filtre et remplacement de données dans macro...

c'est parfait !
vous etes top ca marche super !!!!

vous etes géniaux !!!!