pb selection dans userform

[pakalom]

Bonsoir,

je me tourne vers vous pour deux petits probleme pour vous mais enorme pour moi.

Lorsque je clique sur bouton 1 , le userform1 s'ouvre et doit me selectionner le textbox1 ( là pas de probleme). j'essaie de faire la même chose avec le bouton 2 mais problème, le textbox 2 n'est pas selectionné( et c'est la que je ne comprend pas ).

Mon deuxième souci . Je voudrais que mes deux listbox change de couleur si le cumul est positif ou negatif ( comme sur la feuille1 avec une mise en forme conditionnelle


Merci d'avance

 

[youky(BJ)]

Re : pb selection dans userform

Bonsoir pakalom,
voici de quoi modifier tes 2 macros
et tout sera OK

Sub Bouton1_QuandClic()
UserForm1.TextBox1.SetFocus
UserForm1.ListBox1.BackColor = IIf([D12] > 0, &HFF00&, &HFF&)
UserForm1.ListBox5.BackColor = IIf([G12] > 0, &HFF00&, &HFF&)
UserForm1.Show
End Sub
Sub Bouton2_QuandClic()
UserForm1.TextBox2.SetFocus
UserForm1.ListBox1.BackColor = IIf([D12] > 0, &HFF00&, &HFF&)
UserForm1.ListBox5.BackColor = IIf([G12] > 0, &HFF00&, &HFF&)
UserForm1.Show
End Sub

Bruno

 

[pakalom]

Re : pb selection dans userform

merci beaucoup. tu a resolu mon problème. chapeau et bonne soirée

 

[pakalom]

Re : pb selection dans userform

re bonsoir,

ca marche trés bien mais si je souhaite que ma valeur qui est en d12 soit mise sur une autre feuille et ca ne marche plus même si je mets feuil2!d12

Comment puis je faire

merci d'avance

 

[Pierrot93]

Re : pb selection dans userform

Bonjour,

modifie comme suit :

UserForm1.ListBox5.BackColor = IIf(Sheets("NomFeuille").Range("G12").Value > 0, &HFF00&, &HFF&)

bonne journée
@+