Liste déroulante et userform

Bonjour,

Je viens à vous car j'ai une question concernant mon userform.

Dans l'onglet "historique de commande", j'ai créé des listes déroulantes (dans la colonne Q) pour chaque ligne. Dans la liste déroulante, on peut sélectionner "reçu" ou "non reçu". Quand je sélectionne "non reçu", rien ne se passe (et c'est le but) et quand je sélectionne "reçu", le Userform 2 s'ouvre. Sauf que peut importe la ligne ou je sélectionne "reçu", mon texte (tapé dans le userform) s'écrit en ligne 2.

Exemple: si en Q3 j'écris "reçu", j'aimerais que ce que j'écris dans mon userform se mette sur la ligne 3...Mais pour l'instant ça ne se met que dans la ligne 2.

J'espère avoir été a peu près compréhensible,

Merci d'avance pour votre réponse,

Elise

Bonjour,

il faut transmettre la ligne modifiée/à modifier.

En effet dans ton code, tu fais ton appel à ta procédure sans faire aucun lien entre l'élément qui a été choisi et le formulaire.

Tu précises juste: si j'ai mis "reçu" alors lancer le formulaire, alors que pour ton besoin se serait:

j'ai mis "reçu" alors je lance le formulaire ET je transmet la ligne

Regarde le code que je t'ai fait

Bonjour,

Dans le module de la feuille "historique de commandes modifier comme suit :

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.Column = 17 Then
      If Target = "reçu" Then UserForm2.Show
   End If
End Sub

Dans le module du UserForm2 modifier comme suit :

Option Explicit
Dim REFROW

Private Sub CommandButton1_Click()
Range("A2:Z1000").Sort Key1:=Range("R2"), Order1:=xlAscending
End Sub

Private Sub Label4_Click()

End Sub

Private Sub TextBox1_Change()
Cells(REFROW, 18) = TextBox1
End Sub

Private Sub TextBox2_Change()
Cells(REFROW, 18) = TextBox2
End Sub

Private Sub TextBox3_Change()
Cells(REFROW, 20) = TextBox3
End Sub

Private Sub TextBox4_Change()
Cells(REFROW, 21) = TextBox4
End Sub

Private Sub UserForm_Initialize()
REFROW = ActiveCell.Row
End Sub

A+

[Edit] Désolé pas vu d3d9x... Bonjour.

Réponse similaire...

C'est exactement ça!!

Ca fonctionne super bien, merci beaucoup beaucoup pour l'aide très utile !!

Bonne journée,

Elise