Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Filtre Automatique toujors et encore

Filtre Automatique toujors et encore

11 réponses
Avatar
JP
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non ?

Cordialement

JP
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2
Avatar
Ardus Petus
Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non ?

Cordialement

JP


Avatar
JP
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non ?

Cordialement

JP







Avatar
Ardus Petus
Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?




Cordialement

JP









Avatar
JP
Merci ca marche
mais n'existe il pas une formule equivalante ce qui me simplifirait la tache

merci encore

JP



Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?




Cordialement

JP














Avatar
michdenis
Bonjour JP,


Copie ceci dans un module standard :

Function BtFiltre() As Boolean
Application.Volatile
If Worksheets(Range("A1").Parent.Name).AutoFilterMode Then
BtFiltre = True
End If
End Function

et dans une cellule de ta feuille, tu inscris : = BtFiltre()
la fonction te renvoie vrai ou faux selon que le filtre est présent ou non.


Salutations!




"JP" a écrit dans le message de news:
Merci ca marche
mais n'existe il pas une formule equivalante ce qui me simplifirait la tache

merci encore

JP



Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?




Cordialement

JP














Avatar
JP
bonjour,

merci c'est presque ça en fait le filtre est toujours présent
ce que je voudrais savoir c'est quand j'affiche tout úux et si je filtre
=vrai

je sait que je suis exigent

Cordialement
JP


Bonjour JP,


Copie ceci dans un module standard :

Function BtFiltre() As Boolean
Application.Volatile
If Worksheets(Range("A1").Parent.Name).AutoFilterMode Then
BtFiltre = True
End If
End Function

et dans une cellule de ta feuille, tu inscris : = BtFiltre()
la fonction te renvoie vrai ou faux selon que le filtre est présent ou non.


Salutations!




"JP" a écrit dans le message de news:
Merci ca marche
mais n'existe il pas une formule equivalante ce qui me simplifirait la tache

merci encore

JP



Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?




Cordialement

JP



















Avatar
michdenis
C'est quoi ta question... je ne saisis pas !


Salutations!



"JP" a écrit dans le message de news:
bonjour,

merci c'est presque ça en fait le filtre est toujours présent
ce que je voudrais savoir c'est quand j'affiche tout úux et si je filtre
=vrai

je sait que je suis exigent

Cordialement
JP


Bonjour JP,


Copie ceci dans un module standard :

Function BtFiltre() As Boolean
Application.Volatile
If Worksheets(Range("A1").Parent.Name).AutoFilterMode Then
BtFiltre = True
End If
End Function

et dans une cellule de ta feuille, tu inscris : = BtFiltre()
la fonction te renvoie vrai ou faux selon que le filtre est présent ou non.


Salutations!




"JP" a écrit dans le message de news:
Merci ca marche
mais n'existe il pas une formule equivalante ce qui me simplifirait la tache

merci encore

JP



Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?




Cordialement

JP



















Avatar
JP
Ma question est la suivante
Si je dit "filtre donnée affiché tout " alors dans la cellule A1 úux
et si je filtre alors dans la cellule A1 = Vrai

parceque ta solution me dit "vrai" des que 'donnée filtre" est activé

Salutations
JP


C'est quoi ta question... je ne saisis pas !


Salutations!



"JP" a écrit dans le message de news:
bonjour,

merci c'est presque ça en fait le filtre est toujours présent
ce que je voudrais savoir c'est quand j'affiche tout úux et si je filtre
=vrai

je sait que je suis exigent

Cordialement
JP


Bonjour JP,


Copie ceci dans un module standard :

Function BtFiltre() As Boolean
Application.Volatile
If Worksheets(Range("A1").Parent.Name).AutoFilterMode Then
BtFiltre = True
End If
End Function

et dans une cellule de ta feuille, tu inscris : = BtFiltre()
la fonction te renvoie vrai ou faux selon que le filtre est présent ou non.


Salutations!




"JP" a écrit dans le message de news:
Merci ca marche
mais n'existe il pas une formule equivalante ce qui me simplifirait la tache

merci encore

JP



Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?




Cordialement

JP
























Avatar
FxM
Bonsoir,

Va jeter un oeil du coté de .criteria

@+
FxM (fainéant lui aussi parfois)


Ma question est la suivante
Si je dit "filtre donnée affiché tout " alors dans la cellule A1 úux
et si je filtre alors dans la cellule A1 = Vrai

parceque ta solution me dit "vrai" des que 'donnée filtre" est activé

Salutations
JP


C'est quoi ta question... je ne saisis pas !


Salutations!



"JP" a écrit dans le message de news:
bonjour,

merci c'est presque ça en fait le filtre est toujours présent
ce que je voudrais savoir c'est quand j'affiche tout úux et si je filtre
=vrai

je sait que je suis exigent

Cordialement
JP


Bonjour JP,


Copie ceci dans un module standard :

Function BtFiltre() As Boolean
Application.Volatile
If Worksheets(Range("A1").Parent.Name).AutoFilterMode Then
BtFiltre = True
End If
End Function

et dans une cellule de ta feuille, tu inscris : = BtFiltre()
la fonction te renvoie vrai ou faux selon que le filtre est présent ou non.


Salutations!




"JP" a écrit dans le message de news:
Merci ca marche
mais n'existe il pas une formule equivalante ce qui me simplifirait la tache

merci encore

JP



Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?



Cordialement

JP






















Avatar
michdenis
Bonjour JP,

Je n'ai seulement transformé en fonction... ce que tu semblais
avoir accepté comme solution dans le fil dans les messages précédents.


Mais si tu désires que la fonction te retourne vrai seulement lorsqu'un
filtre est application dans la feuille, essaie ceci comme fonction :

'--------------------------
Function BtFiltre() As Boolean
Application.Volatile
If Worksheets(Range("A1").Parent.Name).FilterMode Then
BtFiltre = True
End If
End Function
'--------------------------


Salutations!



"JP" a écrit dans le message de news:
Ma question est la suivante
Si je dit "filtre donnée affiché tout " alors dans la cellule A1 úux
et si je filtre alors dans la cellule A1 = Vrai

parceque ta solution me dit "vrai" des que 'donnée filtre" est activé

Salutations
JP


C'est quoi ta question... je ne saisis pas !


Salutations!



"JP" a écrit dans le message de news:
bonjour,

merci c'est presque ça en fait le filtre est toujours présent
ce que je voudrais savoir c'est quand j'affiche tout úux et si je filtre
=vrai

je sait que je suis exigent

Cordialement
JP


Bonjour JP,


Copie ceci dans un module standard :

Function BtFiltre() As Boolean
Application.Volatile
If Worksheets(Range("A1").Parent.Name).AutoFilterMode Then
BtFiltre = True
End If
End Function

et dans une cellule de ta feuille, tu inscris : = BtFiltre()
la fonction te renvoie vrai ou faux selon que le filtre est présent ou non.


Salutations!




"JP" a écrit dans le message de news:
Merci ca marche
mais n'existe il pas une formule equivalante ce qui me simplifirait la tache

merci encore

JP



Ca dépent de la feuille sur laquelle tu travaillles.

Essaie:

'-----------------------------------------
if ActiveSheet.AutoFilterMode then
(ton code si le mode filtre automatique est actif)
else
(ton code si le mode filtre automatique est inactif
endif
'-----------------------------------

"JP" a écrit dans le message de
news:
Bonjour,

merci mais comment mettre cela dans une formule ou dans une macro, car je
suis un peut nul en terme de macro
Cordialement
JP


Propriété AutoFilterMode de l'objet Worksheet (Booléen)

Cordialement,
--
AP

"JP" a écrit dans le message de
news:
Bonjour

Merci encore pour ceux qui mon répondu hier,

mais j'ai une autre question

Existe il un moyen de teste si le filtre automatique est activé ou non
?




Cordialement

JP
























1 2