Microsoft 365 Liste déroulante auto-filtrante dans une feuille protégée

[PatyouExcel]

Bonjour à Toutes et tous,
J'ai programmé en VBA, une liste déroulante auto-filtrante pour des données.
Je l'utilise dans une autre feuille pour choisir des données dans une liste.
J'ai déclaré le format de la cellule où la liste est utilisée avec une protection de cellule déverrouillée pour permettre de choisir

• soit en faisant défiler la liste
• Soit en auto-filtration (je tape dans la cellule un mot et il me montre uniquement les données de la liste commençant par ce mot)

Lorsque je verrouille ma feuille, je peux faire défiler ma liste et choisir une donnée. Par contre, la fonction auto-filtrante ne fonctionne plus.

Quelqu'un (e) aurait-elle (il), une astuce pour me sortir de ce piège ?

Merci d'avance de votre aide

 

[Phil69970]

Bonjour @PatyouExcel, le forum

Bienvenu sur Xld
Une piste à ton problème :
Dans ThisWorkbook

Private Sub Workbook_Open()
Sheets("Nom de ta feuille").Select
ActiveSheet.EnableAutoFilter = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True
End Sub

Merci de ton retour

@Phil69970

 

[soan]

Bonjour Phil, Patyou,

moi, je connais les fours auto-filtrants et auto-nettoyants ; il me semble bien que les reins aussi ont une fonction auto-filtrante ; par contre, en cas de calculs rénaux, c'est vraiment pas top ! 😭​

soan

 

[Etoto]

Bonjour à tous et re Patyou

Bonjour Phil, Patyou,

moi, je connais les fours auto-filtrants et auto-nettoyants ; il me semble bien que les reins aussi ont une fonction auto-filtrante ; par contre, en cas de calculs rénaux, c'est vraiment pas top ! 😭​

soan

Soan tu veux que je te paies un filtre ? Je connais du lave-glace pas cher, et perso les calculs, je préfère les avoirs dans une calculette 🤣

Private Sub Workbook_Open()
Sheets("Nom de ta feuille").Select
ActiveSheet.EnableAutoFilter = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True
End Sub

D'ailleurs Patyou, le code de Phil fonctionne ?

 

[PatyouExcel]

Bonjour @PatyouExcel, le forum

Bienvenu sur Xld
Une piste à ton problème :
Dans ThisWorkbook

Private Sub Workbook_Open()
Sheets("Nom de ta feuille").Select
ActiveSheet.EnableAutoFilter = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True
End Sub

Regarde la pièce jointe 1108802
Merci de ton retour

@Phil69970

Bonjour @PatyouExcel, le forum

Bienvenu sur Xld
Une piste à ton problème :
Dans ThisWorkbook

Private Sub Workbook_Open()
Sheets("Nom de ta feuille").Select
ActiveSheet.EnableAutoFilter = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True
End Sub

Regarde la pièce jointe 1108802
Merci de ton retour

@Phil69970

Bonjour Phil69970,

J'ai essayé ta solution mais cela ne marche toujours pas.
Dans mon workbooksheet, je fais des actions sur la feuille sommaire, ensuite je reste sur la feuille sommaire (pour savoir comment utiliser le recherche) ou directement sur la feuille recherche
Je t'envoi le code tapé
Merci d'avance

 

[Etoto]

Bonjour Phil69970,

J'ai essayé ta solution mais cela ne marche toujours pas.
Dans mon workbooksheet, je fais des actions sur la feuille sommaire, ensuite je reste sur la feuille sommaire (pour savoir comment utiliser le recherche) ou directement sur la feuille recherche
Je t'envoi le code tapé
Merci d'avance

Re,

Dans ce cas, autant nous envoyer le classeur Excel aussi, sans données confidentielles.

 

[PatyouExcel]

Bonjour Phil69970,

J'ai essayé ta solution mais cela ne marche toujours pas.
Dans mon workbooksheet, je fais des actions sur la feuille sommaire, ensuite je reste sur la feuille sommaire (pour savoir comment utiliser le recherche) ou directement sur la feuille recherche
Je t'envoi le code tapé
Merci d'avance

 

[Etoto]

Re,

Tu viens d'envoyer un post doublon.

 

[PatyouExcel]

Désolé, je débute sur le forum

 

[Etoto]

Désolé, je débute sur le forum

Re,

Pas de problème, y'a pas mort d'homme 🙂

 

[Phil69970]

Re

Désolé mais une image dans word ne me sert à rien.🤔
Quand on parle de fichier c'est le fichier excel sans donnée confidentiel avec la problématique rencontrée pour pouvoir la reproduire et essayer de trouver une ou des solutions.

@Phil69970

 

[Etoto]

Re

Désolé mais une image dans word ne me sert à rien.🤔
Quand on parle de fichier c'est le fichier excel sans donnée confidentiel avec la problématique rencontrée pour pouvoir la reproduire et essayer de trouver une ou des solutions.

@Phil69970

Re,

D'ailleurs pour info, les post peuvent avoir des images en pages jointes, pas besoin de la mettre dans un document Word.

 

[PatyouExcel]

Phil69970

je dois résoudre mon problème de liste autofiltrante sur les listes NOM (INCI) et N° CAS pour une recherche de substances. Lorsque je protège ma feuille, le fonction auto-filtrante des listes ne fonctionne plus.
Je t'envoi mon fichier comme demandé

 

[Etoto]

Re,

Ton fichier est en partie protégé et je n'arrive pas à trouver la liste source à ta validation des données et je sais pas si ton fichier contient des données confidentielles.


EDIT : Elle est où la la liste source ?

 

[soan]

Re,

c'est peut-être une des nombreuses options à cocher lors de la protection d'une feuille de calcul ?​

genre UserInterfaceOnly, ou autre... ; mais j'm'y connais pas bien là-dessus...

soan