Remplir textbox en fonction combobox

Bonjour le forum
Sur un userform j’ai un combobox avec trois choix
("compréhension de l’écrit" ; "compte rendu de la production écrite" ; " ")
Je veux quand le choix cmb est rien donc valeur textbox (nommé c_ent67) sera rien
Et quand le choix cmb est "compréhension de l’écrit" alors valeur textbox sera "compte rendu de la production écrite" et le troisième cas est l’inverse du deuxième
J’utilise le code suivant mais marche pas bien qu’il faut

Private Sub ComboBox7_Change()
   If ComboBox7.Value = "compréhension de l’écrit" Then
             Me.c_ent67.Value = "compte rendu de la production écrite"
   Else
             Me.c_ent67.Value = "compréhension de l’écrit"
    End If     
End Sub
‘Dans l’Initialize :
Private Sub UserForm_Initialize()
ComboBox7.RowSource = "cours"      'Récupération des Données
ComboBox7 = Sheets("Param").Range("Y22")
End Sub

Merci d’avance pour toute aide.