Fonction décaler, equiv, nbval

46classeur1.xlsx (11.24 Ko)
46classeur1.xlsx (11.24 Ko)

Bonsoir,

Voilà plusieurs jours que je me démène pour trouver la solution à mon problème qui j'en suis sur est simple...

Je vous joins le fichier en PJ "Classeur1".

J'ai crée deux listes déroulante "Centrales" et "Entrepôts".

Lorsque je choisi une centrale en B25, les entrepôts correspondants apparaissent. Jusque là aucun souci.

Le problème survient lorsque je change de centrale, l'ancien entrepôt reste en C25 (sauf si je clique dessus, les entrepôts correspondant à la nouvelle centrale apparaîtront).

Le fichier "Solution" dans l'onglet "Choix" se trouve le résultat que je souhaite obtenir.

Une automatisation du schmilblick en quelque sorte

J'ai la solution à mon problème, je n'arrive simplement pas à l'appliquer à mon fichier (problème d'écriture dans la fonction ?)

Soyez indulgent s'il vous plait

Je vous remercie d'avance pour votre aide précieuse.

36solution.zip (18.95 Ko)

Bonsoir,

Je me suis contenté de copier la macro correspondante du classeur solution dans ton classeur.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$B$25" And Target.Count = 1 And Target <> "" Then
        'Target.Offset(0, 1) = Range("choix2")(1).Offset(1, Application.Match(Target, [choix1], 0) - 1)
        Target.Offset(0, 1).ClearContents
    End If
End Sub

Il fallait une petite adaptation car tes listes sont sur la même feuille... J'ai ajouté une ligne qui efface l'entrepôt lorsque tu modifies la centrale. La ligne au-dessus affichait la première valeur de la liste d'entrepôts. C'est une question de goût... Si tu préfères, tu enlèves l'apostrophe du début de ligne et tu en mets une devant la ligne suivante. Ça te fait une option !

Bonne continuation.

Ferrand

Merci beaucoup pour votre aide

Sujet résolu.

Rechercher des sujets similaires à "fonction decaler equiv nbval"