Comme déclencher une procédure sur activation d'un filtre ?
1 réponse
solliwood
Bonjour.
Sur un tableau avec des filtres automatiques, je souhaiterais déclencher une
procédure lorsqu'un filtre est activé ou désactivé. Y a t-il une solution ?
Merci d'avance...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonjour solliwood,
Si ta plage de cellules sur laquelle tu appliques un filtre automatique ne possède pas au moins une formule, aucune procédure événementielle n'est déclenchée par l'exécution du filtre. La solution, un bouton de commande à partir duquel tu lances ton filtre. Tu peux utiliser une ou deux cellules de la feuille de calcul pour saisir les critères du filtre. Sur ce dernier point, en supposant que tu désignes une ou deux cellules particulières de la feuille pour renseigner ton filtre, l'événement Worksheet_Change s'exécute et tu peux utiliser ce dernier pour déclencher ta procédure :
'--------------------------------- Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("A1").Address Then 'Procédure du filtre automatique 'lancement de ta procédure End If End Sub '---------------------------------
Salutations!
"solliwood" a écrit dans le message de news: dmk09m$emf$ Bonjour. Sur un tableau avec des filtres automatiques, je souhaiterais déclencher une procédure lorsqu'un filtre est activé ou désactivé. Y a t-il une solution ? Merci d'avance...
Bonjour solliwood,
Si ta plage de cellules sur laquelle tu appliques un filtre automatique ne possède pas au moins une formule, aucune procédure
événementielle n'est déclenchée par l'exécution du filtre. La solution, un bouton de commande à partir duquel tu lances ton filtre.
Tu peux utiliser une ou deux cellules de la feuille de calcul pour saisir les critères du filtre. Sur ce dernier point, en supposant
que tu désignes une ou deux cellules particulières de la feuille pour renseigner ton filtre, l'événement Worksheet_Change s'exécute
et tu peux utiliser ce dernier pour déclencher ta procédure :
'---------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("A1").Address Then
'Procédure du filtre automatique
'lancement de ta procédure
End If
End Sub
'---------------------------------
Salutations!
"solliwood" <solliwood@nianiania.com> a écrit dans le message de news: dmk09m$emf$1@apollon.grec.isp.9tel.net...
Bonjour.
Sur un tableau avec des filtres automatiques, je souhaiterais déclencher une
procédure lorsqu'un filtre est activé ou désactivé. Y a t-il une solution ?
Merci d'avance...
Si ta plage de cellules sur laquelle tu appliques un filtre automatique ne possède pas au moins une formule, aucune procédure événementielle n'est déclenchée par l'exécution du filtre. La solution, un bouton de commande à partir duquel tu lances ton filtre. Tu peux utiliser une ou deux cellules de la feuille de calcul pour saisir les critères du filtre. Sur ce dernier point, en supposant que tu désignes une ou deux cellules particulières de la feuille pour renseigner ton filtre, l'événement Worksheet_Change s'exécute et tu peux utiliser ce dernier pour déclencher ta procédure :
'--------------------------------- Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("A1").Address Then 'Procédure du filtre automatique 'lancement de ta procédure End If End Sub '---------------------------------
Salutations!
"solliwood" a écrit dans le message de news: dmk09m$emf$ Bonjour. Sur un tableau avec des filtres automatiques, je souhaiterais déclencher une procédure lorsqu'un filtre est activé ou désactivé. Y a t-il une solution ? Merci d'avance...