XL 2013 Liste déroulante et sélection de cellule

[Jean_Valjean]

Bonjour la communauté,

Je bute sur un problème pas bien compliqué : j'ai un tableau avec des fromages (colonne D) et des quantités (colonne E), j'ai besoin de sélectionner un des fromages à l'aide d'une liste déroulante et que le fromage sélectionné soit annoté d'un "1" dans la colonne C du tableau.

J'arrive à identifier la cellule dans laquelle se trouve le fromage choisi mais je n'arrive pas à sélectionner sa cellule ni me déplacer d'une cellule vers la gauche pour remplir la cellule correspondante de la colonne C. Pour résumer lorsque je sélectionne camembert dans la liste déroulante je chercher écrire 1 en C4.

Merci de votre aide.

 

[sylvanu]

Bonjour,
Je n'ai pas bien compris le but, alors :
1- On veut à chaque choix incrémenter la colonne C :

If Cell.Value = fromage Then
    Cell.Offset(0, -1) = Cell.Offset(0, -1) + 1
End If

2- On veut juste mettre un 1 dans la bonne ligne :

If Cell.Value = fromage Then
    [C4:C100].ClearContents
    Cell.Offset(0, -1) = 1
End If

En PJ la solution 1 est implémentée, la 2 est en commentaire. A ajuster suivant besoin.

 

[Jean_Valjean]

Les 2 solutions fonctionnent parfaitement, merci beaucoup je me suis arraché les cheveux sur le sujet depuis ce matin...