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
papou
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
Bonjour
Je pense que tu peux seulement savoir si tes données sont filtrées avec la
propriété FilterMode de la Feuille qui te renvoie vrai ou faux.
(à ne pas confondre avec Autofiltermode qui indique seulement que le filtre
automatique est actif)
Cordialement
Pascal
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
DBF7BC24-F483-42B2-90D5-FBBC997B0B17@microsoft.com...
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère
d'un filtre.
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
Yvan
Bonjour Yvan.
Est-ce possible?
Sans problème. Moi, je fais comme çà:
(A placer dans la procédure "Worksheet_Change" de la feuille concernée)
Set rngCriteres = Range("Critères") ' A adapter Set rngRecherche = Range("Zone_de_recherche") ' A adapter If Target.Column < rngCriteres.Column Then Exit Sub ' A adapter If Target.Column >= rngCriteres.Column + rngCriteres.Columns.Count Then Exit Sub ' A adapter
Il y a peut-être plus élégant, mais çà, çà fonctionne.
OK?
@+
Yvan ( eh oui, moi aussi!)
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
Bonjour Yvan.
Est-ce possible?
Sans problème. Moi, je fais comme çà:
(A placer dans la procédure "Worksheet_Change" de la feuille concernée)
Set rngCriteres = Range("Critères")
' A adapter
Set rngRecherche = Range("Zone_de_recherche")
' A adapter
If Target.Column < rngCriteres.Column Then Exit Sub
' A adapter
If Target.Column >= rngCriteres.Column + rngCriteres.Columns.Count Then Exit
Sub ' A adapter
(A placer dans la procédure "Worksheet_Change" de la feuille concernée)
Set rngCriteres = Range("Critères") ' A adapter Set rngRecherche = Range("Zone_de_recherche") ' A adapter If Target.Column < rngCriteres.Column Then Exit Sub ' A adapter If Target.Column >= rngCriteres.Column + rngCriteres.Columns.Count Then Exit Sub ' A adapter
Il y a peut-être plus élégant, mais çà, çà fonctionne.
OK?
@+
Yvan ( eh oui, moi aussi!)
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
Yvan
Ok, mais peux-tu être plus explicite ??? Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$A$1" Then MsgBox "c'est partii!" End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
-- Merci pour vos réponses.
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
Ok, mais peux-tu être plus explicite ???
Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then MsgBox "c'est partii!"
End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour
se déclencher automatiquement ???
--
Merci pour vos réponses.
Bonjour
Je pense que tu peux seulement savoir si tes données sont filtrées avec la
propriété FilterMode de la Feuille qui te renvoie vrai ou faux.
(à ne pas confondre avec Autofiltermode qui indique seulement que le filtre
automatique est actif)
Cordialement
Pascal
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
DBF7BC24-F483-42B2-90D5-FBBC997B0B17@microsoft.com...
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère
d'un filtre.
Ok, mais peux-tu être plus explicite ??? Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$A$1" Then MsgBox "c'est partii!" End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
-- Merci pour vos réponses.
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
papou
Re
Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
Dans le code de la feuille en question : Clic droit sur l'onglet, Visualiser le code Tu places le code dans la page blanche à droite
Cordialement Pascal
"Yvan" a écrit dans le message de news:
Ok, mais peux-tu être plus explicite ??? Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$A$1" Then MsgBox "c'est partii!" End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
-- Merci pour vos réponses.
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
Re
Où cette procédure doit-elle être écrite pour
se déclencher automatiquement ???
Dans le code de la feuille en question :
Clic droit sur l'onglet, Visualiser le code
Tu places le code dans la page blanche à droite
Cordialement
Pascal
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
1BA2375D-E6C3-491E-B7CA-BBEA47F823B3@microsoft.com...
Ok, mais peux-tu être plus explicite ???
Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then MsgBox "c'est partii!"
End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour
se déclencher automatiquement ???
--
Merci pour vos réponses.
Bonjour
Je pense que tu peux seulement savoir si tes données sont filtrées avec
la
propriété FilterMode de la Feuille qui te renvoie vrai ou faux.
(à ne pas confondre avec Autofiltermode qui indique seulement que le
filtre
automatique est actif)
Cordialement
Pascal
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
DBF7BC24-F483-42B2-90D5-FBBC997B0B17@microsoft.com...
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le
critère
d'un filtre.
Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
Dans le code de la feuille en question : Clic droit sur l'onglet, Visualiser le code Tu places le code dans la page blanche à droite
Cordialement Pascal
"Yvan" a écrit dans le message de news:
Ok, mais peux-tu être plus explicite ??? Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$A$1" Then MsgBox "c'est partii!" End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
-- Merci pour vos réponses.
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
lSteph
Bonsoir, (...a.m.h.a...) Cette macro affiche "c'est parti" si la sélection en cours change pour la cellule A1 et non par modification du critère d'un filtre.
Cordialement.
LSteph "Yvan" a écrit dans le message de news:
Ok, mais peux-tu être plus explicite ??? Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$A$1" Then MsgBox "c'est partii!" End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
-- Merci pour vos réponses.
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.
Est-ce possible et comment ???
-- Merci pour vos réponses.
Bonsoir,
(...a.m.h.a...) Cette macro affiche "c'est parti" si la sélection en cours
change pour la cellule A1
et non par modification du critère d'un filtre.
Cordialement.
LSteph
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
1BA2375D-E6C3-491E-B7CA-BBEA47F823B3@microsoft.com...
Ok, mais peux-tu être plus explicite ???
Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then MsgBox "c'est partii!"
End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour
se déclencher automatiquement ???
--
Merci pour vos réponses.
Bonjour
Je pense que tu peux seulement savoir si tes données sont filtrées avec
la
propriété FilterMode de la Feuille qui te renvoie vrai ou faux.
(à ne pas confondre avec Autofiltermode qui indique seulement que le
filtre
automatique est actif)
Cordialement
Pascal
"Yvan" <Yvan@discussions.microsoft.com> a écrit dans le message de news:
DBF7BC24-F483-42B2-90D5-FBBC997B0B17@microsoft.com...
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le
critère
d'un filtre.
Bonsoir, (...a.m.h.a...) Cette macro affiche "c'est parti" si la sélection en cours change pour la cellule A1 et non par modification du critère d'un filtre.
Cordialement.
LSteph "Yvan" a écrit dans le message de news:
Ok, mais peux-tu être plus explicite ??? Sur Excelabo, je trouve :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Address = "$A$1" Then MsgBox "c'est partii!" End Sub
Mais cela ne fonctionne pas. Où cette procédure doit-elle être écrite pour se déclencher automatiquement ???
-- Merci pour vos réponses.
Bonjour Je pense que tu peux seulement savoir si tes données sont filtrées avec la propriété FilterMode de la Feuille qui te renvoie vrai ou faux. (à ne pas confondre avec Autofiltermode qui indique seulement que le filtre automatique est actif) Cordialement Pascal
"Yvan" a écrit dans le message de news:
Bonjour,
Je souhaite qu'une macro se déclenche si l'utilisateur modifie le critère d'un filtre.