macro qd click sur listbox sur feuille excel

Bonjour a tout le Forum,

J'ai une listbox sur une feuille excel, qui reprends des element d'une base sur une autre feuille excel ( grace à l'aide d'Hervé que je remercie encore).

Ce que j'aimerais faire c'est lorsque l'on clique sur cette listbox, un usf s'ouvre. Ce usf a qqles textbox, et je voudrais que la valeur des ces textbox soit par exemple la valeur de la 3eme colonne de la ligne de la listbox qui a été cliquée pour ouvrir cet usf.

Cliqué sur la listbox et que le usf s'ouvre: pas de pb.avec le code suivant dans :

Private Sub ListBox_MEMO_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
UserForm12.Show
End Sub

Seulement dans le code de l'usf ( qui contient le textbox1), j'ai mis le code suivant ( en m'inspirant de ce que j'ai vu sur le forum):

Private Sub UserForm_Initialize()
NomLBindex = listbox1.ListIndex + 2
TextBox1 = Sheets('Base_MEMO').range('A' & NomLBindex)
'End Sub


Et là:

soit le textbox reste vide

soit il me pose pb avec Private Sub UserForm_Initialize() qu'il me souligne en jaune.

Quelqu'un peut il m'aider?

Je vous un petit exemple

Merci d'avance pour votre aide

Cordialement

Zeltron