Bonjour,
dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer
- "Filtre automatique" est coché et grisé
- "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
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,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Cordialement Michel dit "Sam"
Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée :
'----------------------------
Sub test()
Dim Arr(), Elt As Variant
Arr = Array(899, 900)
For Each Elt In Arr
With Application.CommandBars.FindControl(ID:9)
.Enabled = True
End With
Next
End Sub
'----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" <prenom-ou-sam@citron.fr> a écrit dans le message de groupe de discussion :
4c51e3bb$0$5408$ba4acef3@reader.news.orange.fr...
Bonjour,
dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer
- "Filtre automatique" est coché et grisé
- "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
"michdenis" <michdenis@hotmail.com> a écrit dans le message de groupe de discussion : i2spio$iph$1@speranza.aioe.org...
Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée :
'----------------------------
Sub test()
Dim Arr(), Elt As Variant
Arr = Array(899, 900)
For Each Elt In Arr
With Application.CommandBars.FindControl(ID:9)
.Enabled = True
End With
Next
End Sub
'----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" <prenom-ou-sam@citron.fr> a écrit dans le message de groupe de discussion :
4c51e3bb$0$5408$ba4acef3@reader.news.orange.fr...
Bonjour,
dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer
- "Filtre automatique" est coché et grisé
- "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Cordialement Michel dit "Sam"
Sam
Bonjour MichD, c'est du Excel2003 la macro n'a rien réglé
mais ce n'est pas grave j'ai recréé un nouveau classeur en copiant chaque feuille.
J'ai dû certainement tester une macro en prenant ce fichier comme référence !
Bon ça serait bien pour la communauté si on pouvait découvrir la cause et le remède sur cet "ancien fichier" Cordialement Michel dit "Sam"
"michdenis" a écrit dans le message de news: i2spo2$j3j$
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Cordialement Michel dit "Sam"
Bonjour MichD,
c'est du Excel2003
la macro n'a rien réglé
mais ce n'est pas grave j'ai recréé un nouveau classeur en copiant chaque
feuille.
J'ai dû certainement tester une macro en prenant ce fichier comme référence
!
Bon ça serait bien pour la communauté si on pouvait découvrir la cause et le
remède sur cet "ancien fichier"
Cordialement
Michel dit "Sam"
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
i2spo2$j3j$1@speranza.aioe.org...
"michdenis" <michdenis@hotmail.com> a écrit dans le message de groupe de
discussion : i2spio$iph$1@speranza.aioe.org...
Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version
antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée :
'----------------------------
Sub test()
Dim Arr(), Elt As Variant
Arr = Array(899, 900)
For Each Elt In Arr
With Application.CommandBars.FindControl(ID:9)
.Enabled = True
End With
Next
End Sub
'----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en
application !
"Sam" <prenom-ou-sam@citron.fr> a écrit dans le message de groupe de
discussion :
4c51e3bb$0$5408$ba4acef3@reader.news.orange.fr...
Bonjour,
dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer
- "Filtre automatique" est coché et grisé
- "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Cordialement Michel dit "Sam"
michdenis
si tu désires, Envoie moi ton fichier sur mon adresse Hotmail... je regarde plus tard dans la journée.
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Cordialement Michel dit "Sam"
si tu désires,
Envoie moi ton fichier sur mon adresse Hotmail...
je regarde plus tard dans la journée.
"michdenis" <michdenis@hotmail.com> a écrit dans le message de groupe de
discussion : i2spio$iph$1@speranza.aioe.org...
Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version
antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée :
'----------------------------
Sub test()
Dim Arr(), Elt As Variant
Arr = Array(899, 900)
For Each Elt In Arr
With Application.CommandBars.FindControl(ID:9)
.Enabled = True
End With
Next
End Sub
'----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en
application !
"Sam" <prenom-ou-sam@citron.fr> a écrit dans le message de groupe de
discussion :
4c51e3bb$0$5408$ba4acef3@reader.news.orange.fr...
Bonjour,
dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer
- "Filtre automatique" est coché et grisé
- "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Cordialement Michel dit "Sam"
Sam
Bonjour, j'ai trouvé d'où venait le pb : dans les propriétés de ThisWorkbook , DisplayDrawingObjects était positionné sur 3 - xlHide je l'ai remis à -4104- xlDisplayShapes.
J'ai certainement dû tester une macro présentée sur ce forum il y a quelques temps. J'ai voulu la modifier et elle a dû se planter sans aller jusqu'au bout.
Cordialement Michel dit "Sam"
"michdenis" a écrit dans le message de news: i2ufev$qh5$
si tu désires, Envoie moi ton fichier sur mon adresse Hotmail... je regarde plus tard dans la journée.
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Cordialement Michel dit "Sam"
Bonjour,
j'ai trouvé d'où venait le pb :
dans les propriétés de ThisWorkbook , DisplayDrawingObjects était positionné
sur 3 - xlHide
je l'ai remis à -4104- xlDisplayShapes.
J'ai certainement dû tester une macro présentée sur ce forum il y a quelques
temps.
J'ai voulu la modifier et elle a dû se planter sans aller jusqu'au bout.
Cordialement
Michel dit "Sam"
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
i2ufev$qh5$1@speranza.aioe.org...
si tu désires,
Envoie moi ton fichier sur mon adresse Hotmail...
je regarde plus tard dans la journée.
"michdenis" <michdenis@hotmail.com> a écrit dans le message de groupe de
discussion : i2spio$iph$1@speranza.aioe.org...
Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version
antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée :
'----------------------------
Sub test()
Dim Arr(), Elt As Variant
Arr = Array(899, 900)
For Each Elt In Arr
With Application.CommandBars.FindControl(ID:9)
.Enabled = True
End With
Next
End Sub
'----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en
application !
"Sam" <prenom-ou-sam@citron.fr> a écrit dans le message de groupe de
discussion :
4c51e3bb$0$5408$ba4acef3@reader.news.orange.fr...
Bonjour,
dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer
- "Filtre automatique" est coché et grisé
- "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
Bonjour, j'ai trouvé d'où venait le pb : dans les propriétés de ThisWorkbook , DisplayDrawingObjects était positionné sur 3 - xlHide je l'ai remis à -4104- xlDisplayShapes.
J'ai certainement dû tester une macro présentée sur ce forum il y a quelques temps. J'ai voulu la modifier et elle a dû se planter sans aller jusqu'au bout.
Cordialement Michel dit "Sam"
"michdenis" a écrit dans le message de news: i2ufev$qh5$
si tu désires, Envoie moi ton fichier sur mon adresse Hotmail... je regarde plus tard dans la journée.
"michdenis" a écrit dans le message de groupe de discussion : i2spio$iph$ Bonjour,
D'après ta présentation, ce que tu observes doit être sur une version antérieure à Excel 2007.
En prenant pour acquis que tu travailles sur une feuille non protégée : '---------------------------- Sub test() Dim Arr(), Elt As Variant Arr = Array(899, 900) For Each Elt In Arr With Application.CommandBars.FindControl(ID:9) .Enabled = True End With Next End Sub '----------------------------
La commande "Afficher tout" deviendra disponible lorsqu'un filtre sera en application !
"Sam" a écrit dans le message de groupe de discussion : 4c51e3bb$0$5408$
Bonjour, dans un classeur, pour toutes les feuilles, quand on fait Données/filtrer - "Filtre automatique" est coché et grisé - "Afficher tout" est grisé
Comment revenir à une situation afin de pouvoir filtrer normalement ?
