vba # Challenge! Simplification de codeRésolu

Question

slt,

Je veux al&#233;ger mon code car ca prend trop de place pour un code vba!

Qui peux me proposer une solution ? Sachant que j'ai 31 CheckBox ! 



Private Sub CheckBox1_Click()

  If CheckBox1.Value =  True Then 

    ComboBox1.Visible = True

  Else

    ComboBox1.Visible = False

  End If

 End Sub 



Private Sub CheckBox2_Click()

  If CheckBox2.Value  = True Then

    ComboBox2.Visible =  True

  Else

    ComboBox2.Visible = False

  End If

 End Sub 



...



Private Sub CheckBox31_Click()

  If CheckBox31.Value  = True Then

    ComboBox31.Visible = True

  Else

    ComboBox31.Visible = False

  End If

End Sub




J'attend vos r&#233;ponse avec impatience 



zazadec

cs_dragon · Accepted Answer

pas en vba
en vb6 oui
en vb.net on a l'orient&#233; objet et/ou la propri&#233;t&#233; Tag

masi en vba, on a rien


------------------------------------------------- 
Dragon alias aussi Waxime mais bon, pas le gout de refaire un nouveau profil lol 
-------------------------------------------------

cs_dragon · Answer

Private Sub CheckBox31_Click()
    ComboBox31.Visible = CheckBox31.Value
End Sub

d&#233;sol&#233;, mais peut pas plus que &#231;a, tu es en VBA
tu as ni la propri&#233;t&#233; tag, ni la possibilit&#233; de faire de l'orient&#233; objet


------------------------------------------------- 
Dragon alias aussi Waxime mais bon, pas le gout de refaire un nouveau profil lol 
-------------------------------------------------

zazadec · Answer

il faudrait que j'achete .net ?

cs_dragon · Answer

si tu connais pas l'orient&#233; objet, tu pourras pas pousser .net
donc tu seras au m&#234;me point

tu as VB.net 2005 beta de gratuit sur le site de microsoft


------------------------------------------------- 
Dragon alias aussi Waxime mais bon, pas le gout de refaire un nouveau profil lol 
-------------------------------------------------

zazadec · Answer

ca veut dire quoi l'orient&#233; objet. une technique ? une m&#233;tode ?

zazadec

zazadec · Answer

Y'a un pb, et plutot de taille

ta fonction marche pour les checkbox de 1 &#224; 9, mais ne font plus rien &#224; partir de 10, il comprend 10 comme 1.

ARF, ce prog commence &#224; me

cs_dragon · Answer

l'orient&#233; objet est une fa&#231;on de programm&#233;

&#231;a amrche pas apr&#232;s 10 ??? comment tu l'as programmer, tu es sur d'avoir mis les bon nom de variable


------------------------------------------------- 
Dragon alias aussi Waxime mais bon, pas le gout de refaire un nouveau profil lol 
-------------------------------------------------

zippro4012 · Answer

C pas possible de mettre un index ?

Vba # Challenge! Simplification de code

8 réponses

Discussions similaires