Atteindre une cellule en fonction d'un combobox

Bonjour !!

Je rencontre un problème dans mon projet de programmation VBA Excel.

Après avoir remplis 2 combobox, l'utilisateur doit rentrer la valeur d'un code dans un textbox. Seulement les valeurs autorisées pour ce code dépendent du choix du 2ème combobox

J'ai donné des noms aux groupements de cellules concernées.

Si quelqu'un sait comment atteindre l'une de ces zones en fonction de la valeur du 2ème Combobox il me serait d'une grande aide !!

Je vous mets mon fichier avec des annotations et un début de tentative

Merci d'avance !

15prog-forum.xlsm (357.97 Ko)

Bonjour,

à tester,

Private Sub Référence_Change()
Dim t As String, n As Long
t = "MATCH(""" & Ligne.Value & """&""" & Référence.Value & """,Données!B:B&Données!C:C,0)"
n = Evaluate(t)
Me.Label3 = Sheets("Données").Cells(n, "D")
Me.Défauts = Sheets("Données").Cells(n, "E")
End Sub

Bonjour,

Ce n'est pas à ça que je pensais

Ce que j'essaie de faire, si la référence choisie est 44GTE3F5, le programme utilise le tableau "D1:DF2". Pour les 44GTE3V5, ça sera dans "D24:CN43" etc avec les autres tableaux que j'ajouterais.

Seulement les noms de cellules ne peuvent pas commencer par des numéros, ce qui complique la chose !

Par curiosité, dans ta proposition, que vaut le "t" ? Je ne comprends pas bien.

Merci beaucoup !

re,

t est le texte de la formule matricielle

"MATCH(""" & Ligne.Value & """&""" & Référence.Value & """,Données!B:B&Données!C:C,0)"

c'est à dire une recherche des valeurs des combobox Ligne & Référence sur l'onglet Données colonne B & C

n = Evaluate(t)

n retourne le numéro de la ligne ou ces deux valeurs sont trouvées

Rechercher des sujets similaires à "atteindre fonction combobox"