Macro liste déroulante + formule

Bonjour a tous,

j'aimerais avoir dans une meme cellule, une liste déroulante plus une formule qui est vrai pour un seul cas seulement.

ci-joint le fichier.

merciii bcp

24test-status.xlsx (14.75 Ko)

Bonjour

Automatiquement, je ne sais pas. Par contre, tu peux jouer sur la validation avec une formule pour que à 1 ne corresponde que le choix Closed

Cf fichier joint

cordialement

26test-status.xlsx (14.38 Ko)

bonjour,

as-tu une idée pour la formule?

car si je mets : si(A7="1";D7="Closed";"") ca ne marchera pas...

merci

Bonjour

Un autre moyen de faire avec VBA

Cordialement

30test-status.zip (14.66 Ko)

merci beaucoup

pour l'instant ca marche, sauf que si je supprime dans un "1" il ne met pas à jour automatiquement...

merci beaucoup

Bonjour

En rajoutant un Code dans Feuil 1

Cordialement

33test-status.zip (14.81 Ko)

bonsoir,

ca marche trés bien sauf quand je sélectionne 2 cellules ou plus dans "B" et que j'appuie sur la touche 'Supp" il m'envoi un message d'erreur !

Merci

Bonjour

Tu peux pour cela modifier le Code de feuille

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Not Application.Intersect(Target, Range("$B$7:$B$16")) Is Nothing  Then

par

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
If Not Application.Intersect(Target, Range("$B$7:$B$16")) Is Nothing And Target.Count = 1 Then

mais la solution correcte est cellule par cellule

Cordialement

Rechercher des sujets similaires à "macro liste deroulante formule"