Appliquer une macro sur une seule colonne

Bonjour à tous,

Ci-après mon code :

Private Sub Worksheet_selectionChange(ByVal Target As Range)

Worksheets(sheet1).Activate
ActiveSheet.Range("$C$2:$CL$865").AutoFilter Field:=81, Criteria1:=Target.Value

End Sub

La macro fonctionne bien : elle est positionnée sur la feuille 2 (sheet 2 ), et lorsque je click sur une des valeurs dans cette sheet2, elle me filtre cette valeur dans le sheet 1 au niveau de la colonne 81 (Field:=81)

Donc cette partie c'est niquel, mais je voudrais que ça fasse la même chose, mais seulement quand je click dans la colonne B de la sheet2 (alors qu'actuellement, la macro se lance peu importe ou je click). La finalité c'est que sur les autres colonnes de la sheet2 j'aimerais la même chose mais filtrant des colonnes différentes (en sheet1) en fonction de la colonne (de sheet2) où je click.

N'y connaissant (presque) rien en VBA, j'ai l'impression que ça doit être simple, il me manque juste la procédure. Si c'est plus compliqué que ça, je peux vous envoyer un fichier modifié comme exemple (car pas possible pour l'original).

Voilà, en espérant avoir été clair.

Merci d'avance à ceux qui pourront m'aider !

Thomas J

bonjour,

essaie ceci

Private Sub Worksheet_selectionChange(ByVal Target As Range)
    If Target.Column = 2 Then
        Worksheets("Sheet1").Activate
        ActiveSheet.Range("$C$2:$CL$865").AutoFilter Field:=81, Criteria1:=Target.Value
    End If
End Sub

Merci H2so4,

C'était donc bien assez simple, alors que j'ai essayé des trucs complexes !

en tout cas merci du retour + réactivité

Problème résolu

Thomas J