Aide Cellule cachée

[toff300583]

Bonjour,
Je voulais savoir si un truc est possible
Je crée cellule liste avec plusieurs choix. SI par exempleje choisis dans mon exemple "C" une cellule "OK" apparait, est ce que c'est faisable?
MErci d'avance

 

[ERIC S]

Re : Aide Cellule cachée

re

tu écris en blanc dans ta cellule

puis format "mise en forme conditionnelle"
sélectionner "la formule est"
= ($B$1="C")

tu choisis format, la couleur de fond, de police


sinon si c'est juste "OK",
=si(B1="C","OK";"")

 

[toff300583]

Re : Aide Cellule cachée

Merci pour ton aide. Mais je me suis mal exprimé la dernière fois mais si je veux cette fois ci faire apparaitre une case liste.Ci -joint l'exemple

 

[ERIC S]

Re : Aide Cellule cachée

re

je ne comprends pas trop

tu obtiens C dans une cellule et tu veux faire apparaître une liste dans une autre?

Et si tu as A ou B... tu fais quoi? rien? Une autre liste?

 

[toff300583]

Re : Aide Cellule cachée

SI je choisis A ou B ou ... l'autre liste doit rester cacher.
Merci

 

[ERIC S]

Re : Aide Cellule cachée

Bonjour

tu caches la liste mais est-ce qu'il doit rester une valeur dans la cellule.
(A partir du moment ou tu as mis C et sélectionné une valeur, ta cellule est non vide)

 

[wilfried_42]

Re : Aide Cellule cachée

Bonjour Toff300583, Eric

Menu données/Validation ---> liste

Formule à entrer : =SI($B3>"B";$N$6:$N$9;$N$5)

Edit : Pour permetre une remise à blanc de la cellule

Si j'ai bien compris

 

[ERIC S]

Re : Aide Cellule cachée

Re

d'accord avec toi Wilfried mais la cellule n'est pas effacée

je mettrais =si($B$3="C"...

 

[wilfried_42]

Re : Aide Cellule cachée

re:

J'ai fait un edit pour un effacement manuel de la cellule ou avec un format conditionnel blanc sur blanc, cela cache mais n'efface pas

Je crois mais à confirmer, pour supprimer un liste de validation, il faut passer par macro avec interruption evenementielle sur saisie de la cellule $B$3

 

[ERIC S]

Re : Aide Cellule cachée

re

effectivement exemple

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Not Target.Address = "$B$3" Then Exit Sub
If Target.Value = "C" Then Exit Sub
Range("B6").ClearContents
End Sub

 

[wilfried_42]

Re : Aide Cellule cachée

re:

voici une version macro avec suppression de la liste de validation

un macro dans Worksheet
2 macro dans module1

 

[toff300583]

Re : Aide Cellule cachée

merci beaucoup je vais essayer mettre ca en appication

 

[toff300583]

Re : Aide Cellule cachée

Wilfried 42,

J'ai essaye de mettre en apllication ta macro sur mon classeur mais je n'arrive pas, ca bug. Je l'ai joint ci-dessous feuille "Interface". ET peux tu m'expliquer en plus comment tu l'as crée car je suis loin d'être une bête avec les macros.
Merci d'avance

 

[wilfried_42]

Re : Aide Cellule cachée

re:

Ton fichier en retour, j'ai expliqué un max, mais utilisant l'enregistreur de macros, je ne connais pas tous les parametres qui y sont mis

 

[toff300583]

Re : Aide Cellule cachée

DLS de te prendre encore la tête
Tu as inversé la fonction que je voulais, c quand il y a "EN 10 216-5" que la liste doit apparaître. ET j'ai pas vu ou était tes explications.
Merci encore une fois