plusieurs noms

[petchy]

Bonjour le Forum,

est il possible de mettre plusieurs noms derriere "salaire",si oui comment

Private Sub ComboBox1_Change()
If ComboBox1.Value = "Salaire" Then
TextBox1.Visible = False
Label1.Visible = False
TextBox2.Visible = True
Label2.Visible = True
Else
TextBox1.Visible = True
Label1.Visible = True
TextBox2.Visible = False
Label2.Visible = False
End If
End Sub

merci,@ plus
petchy

 

[William]

Bonjour Petchy,

Oui, il est possible de mettre plusieur noms derrière salaire...

Le code est :

If ComboBox1.Value = "Salaire" & "zaza" Then


A condition que zaza soit une donnée fixe, que tu programme.

Sinon, il faut indiquer zaza sans les " " si tu fais référence à une donnée déjà renseignée ailleurs....

A Bientôt,

William

 

[petchy]

salut William

merci pour ta réponse,mais en fait c'est salaire ou virement sécu.....etc

Private Sub ComboBox1_Change()
If ComboBox1.Value = "Salaire" & "Virement Sécu" Then
TextBox1.Visible = False
Label1.Visible = False
TextBox2.Visible = True
Label2.Visible = True
Else
TextBox1.Visible = True
Label1.Visible = True
TextBox2.Visible = False
Label2.Visible = False
End If
End Sub

Private Sub CommandButton1_Click()
Unload Me
End Sub

Private Sub UserForm_Initialize()
With ComboBox1
.AddItem "Divers"
.AddItem "Essence"
.AddItem "Courses"
.AddItem "Retrait CB"
.AddItem "Rembt Emprunt"
.AddItem "Loisirs"
.AddItem "Habillement"
.AddItem "Cigarettes"
.AddItem "Salaire"
.AddItem "Remise Chèque (s)"
.AddItem "Virement Sécu"
.AddItem "Virement Mutuelle"
End With
End Sub

@ plus
petchy