Bonjour,
J'ai besoin pour un projet qu'une variable prenne une valeur dans une userform puis je compte réutiliser cette valeur (du texte) au changement de ma feuille 1.
J'ai déclaré la variable comme ceci, tout au début de la feuille 1:
Public w as variant
Dans ma userform j'utilise ceci:
Private Sub OK_Click()
If Me.ComboBoxRetard.Text = "" Then
Call MsgBox("Vous n'avez rien selectionné", , "Erreur")
Else
w = Me.ComboBoxRetard.Text
Unload Me
End If
End Sub
Et enfin au changement de ma feuille 1 je déclanche ceci:
If Sheets("Demande").Range("T" & y).Value = "Retard" Then
Retard.Show
Sheets("Demande").Range("W" & y) = w
End If
Tout me parait correcte mais cependant, peu importe ce que je sélectionne dans la userform, la case W reste vide
Je pense que cela vient de la variable, je l'ai bien déclaré?