macro qd click sur listbox sur feuille excel

[zeltron]

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

 

[zeltron]

j'avais oublié le fichier, excusez moi

 

[zeltron]

enfin le fichier!! [file name=zeltron_20060326195816.zip size=14413]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/zeltron_20060326195816.zip[/file]

 

[salim]

Bonsoir zeltron

Si j'ai bien compris ta demande je te rend ton fichier modifié.

salim. [file name=zeltron_20060326201816.zip size=14179]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/zeltron_20060326201816.zip[/file]

 

[zeltron]

Merci, Salim,

C'est exactement ce que je chercahis a faire, j'etudie ton code, si j'ai des questions, je n'hesiterais pas

Merci encore
Salutations

Zeltron