Forcer valeur cellule selon résultat d'une autre

Bonjour à tous,

Cette question à sans doute fait l'objet de requête, mais après plusieurs recherches infructueuses, je me tourne vers vous...

J'ai dans une cellule A1 une liste déroulante avec option dans la liste une valeur "--" possible.

En cellule A3 j'ai une cellule identique...

Je souhaiterais forcé la valeur "--" dans A3 si la valeur de A1 est "--". Je tiens cependant à ce que la cellule A3 soit vide de toute fonction...

(pas de =SI(A1="--"; ... par exemple)

En fait j'ai 7 cellules à programmer de la même manière...

D'avance merci

Willau

Salut Willau,

trop simple comme problème : il y a quelque chose là-dessous que tu ne nous dis pas...

Private Sub Worksheet_Change(ByVal Target As Range)
'
If Not Intersect(Target, Range("A1")) Is Nothing Then [A3] = [A1]
'
End Sub

A suivre...

A+

Oh non, je ne dis pas tout.... et heureusement !

Merci Curulis57 pour la réponse rapide.

Malheureusement dans ta formule tu parles d'une valeur "nothing"... et ce n'est pas dans mon intitulé.

J'ai bien spécifié la valeur "--" qui figure dans ma liste déroulante.

C'est sans doute simple pour un expert. Le débutant, quant à lui, ne peut qu'apprendre...

Merci.

Willau

Salut Willau,

ce nothing là n'a rien à voir avec ton -, malin...

Ce code signifie simplement que, automatiquement, [A3] prend la même valeur (quelle que soit cette valeur) que [A1] au moindre changement de valeur de [A1].

Essaie...

A+

Oh... il y a rien de malin si je me plante !

Mais pour la deuxième partie de réponse, ce n'est pas ça...

A3 prend la valeur de A1 si A1 égale "--"

Mais A1 peut avoir plusieurs valeurs définies dans une liste déroulante...

Donc je ne pense pas que ton code soit le bon pour mon besoin.... Pas si facile pour le coup, n'est-ce pas

Merci quand même !

Willau

Pas facile car ton monde n'est pas mon monde et ce qui est évident pour toi puisque c'est ton projet est dans le brouillard pour moi, pour nous, qui le découvrons par bribes et morceaux quand ce ne sont pas des miettes...

Donc, quand tu présentes une demande, sois clair et complet!

Dans ce cas, est-ce que "-" est la SEULE valeur dont il faille tenir compte pour la recopier en [A3], en ignorant TOUTES les autres?

If Not Intersect(Target, Range("A1")) Is Nothing And [A1]="-" Then [A3] = [A1]

A adapter encore, j'imagine..

A+

Bonsoir Willau, curulis57,

je te propose ce fichier Excel :

56exo-willau.xlsm (13.46 Ko)

à toi d'faire les tests ; exemple : saisie de "--" en A1.

Alt F11 pour voir le code VBA, puis revenir sur Excel

si besoin, tu peux demander une adaptation.

merci de me dire si ça te convient.

dhany

Bonjour Willau,

toujours pas d'retour ?

à tout hasard, je précise que "Feuil1" est entièrement vide, mais que cette feuille a bien son propre code VBA :

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
  With Target
    If .Count > 1 Then Exit Sub
    If .Address <> "$A$1" Then Exit Sub
    [A3] = "": If .Value = "--" Then [A3] = "--"
  End With
End Sub

donc si tu saisis -- en A1, ça sera bien copié en A3 ... et c'est c'que t'avais demandé dans ton énoncé initial :

Willau a écrit :

Je souhaiterais forcer la valeur "--" dans A3 si la valeur de A1 est "--". Je tiens cependant à ce que la cellule A3 soit vide de toute fonction...

j'ai mis un format Texte pour les 2 cellules A1 et A3


alors, sujet résolu ? si oui :

rappel : il te suffit de cliquer sur le bouton situé près du bouton (dans le coin haut droit d'un post)

dhany

Bonjour Dhany

Mille excuses pour le délai de réponse.

Pas mal chargé à différentes activités, je n'ai pas pris le temps de répondre.

Merci pour l'aide. ça fonctionne jusqu'ici.

Merci pour l'aide !

Willau

Bonjour Willau,

merci pour ton retour (même tardif) ! j'suis ravi d'avoir pu t'aider !

bonne continuation !

dhany

J'ai mis une nouvelle question sur le forum...

Peut-être peu tu m'aides ?

j'viens d'lire ton sujet "Insérer le user et date&heure dans cellule lorsque modifications" ; mais pour ça, j'ai pas d'idée !

Bonjour,

Réponse stupide, mais une simple MFC n'aurait pas fait l'affaire ?

Rechercher des sujets similaires à "forcer valeur resultat"