Plusieurs IF dans initialize ?

[Geraldine]

Bonjour,

Je desespère de ne rien comprendre au language vb.
Pourquoi tout mes IF ne fonctionnent pas, il manque un end if ?

Private Sub userform_initialize()
With Sheets("FEUIL1")
If [b1] = "" Then TextBox1.Value = .Range("b19").Value
If [b1] <> "" Then TextBox1.Value = .Range("b1").Value
If [b2] = "" Then TextBox2.Value = .Range("b3").Value
If [b2] <> "" Then TextBox2.Text = .Range("b2").Value
TextBox3.Text = .Range("b3").Value
TextBox4.Text = .Range("b4").Value
End With
End Sub

merci à vous, géraldine

 

[Spitnolan08]

Re : Plusieurs IF dans initialize ?

Bonjour,

Je mettrais plutôt ça mais je ne vois pas où il manque un end if... Peut être un autre problème non ?

 Private Sub userform_initialize()
With Sheets("FEUIL1")
If .Range("b1") = "" Then 
TextBox1.Value = .Range("b19").Value
Else
 TextBox1.Value = .Range("b1").Value
end if

If .range("b2") = "" 
Then TextBox2.Value = .Range("b3").Value
else
TextBox2.Text = .Range("b2").Value
End if
    TextBox3.Text = .Range("b3").Value
    TextBox4.Text = .Range("b4").Value
End With
End Sub

Cordialement

 

[yadla]

Re : Plusieurs IF dans initialize ?

Bonjour Géraldine, Bonjour Spitnolan,

😱 Trop lente Yadla !!!!😱 Je n'ai plus rien à dire

J'aurais mis pareil

 

[Cousinhub]

Re : Plusieurs IF dans initialize ?

Bonjour, ton code fonctionne parfaitement.
Tu peux le simplifier comme cela :

Private Sub userform_initialize()
With Sheets("FEUIL1")
TextBox1.Value = IIf(.[b1] <> "", .[b1], .[b19])
TextBox2.Value = IIf(.[b2] <> "", .[b2], .[b3])
TextBox3.Text = .Range("b3").Value
TextBox4.Text = .Range("b4").Value
End With
End Sub

 

[Geraldine]

Re : Plusieurs IF dans initialize ?

bonjour spitnolan08, yadla et bhbh,

A force d'en rajouter, je les codes doivent se melanger, ça m'enerve

bhbh, ton code me surprend je vais essayer mais c'est bien If et non IIf

Merci, géraldine

 

[Geraldine]

Re : Plusieurs IF dans initialize ?

bonjour spitnolan08, yadla et bhbh,

A force d'en rajouter, je les codes doivent se melanger, ça m'enerve

bhbh, ton code me surprend je vais essayer mais c'est bien If et non IIf

Merci, géraldine

non ok c'est IIF

 

[Cousinhub]

Re : Plusieurs IF dans initialize ?

Re-,
Iif permet de faire une comparaison, et en fonction du résultat, renvoie le premier ou le deuxième terme

 

[Geraldine]

Re : Plusieurs IF dans initialize ?

ok, enfin un code alleger dans mon application bien confuse ... encore merci bhbh

 

[yadla]

Re : Plusieurs IF dans initialize ?

Re, bonjour bhbh,

C'est vrai que ce IIf est très bien, il raccourci bien le code.
Petite astuce en plus, on me l'avait déjà conseillé...
D'ailleurs c'était peut etre toi bhbh
Tu m'as déjà pas mal apporté d'aide sur ce forum, merci
Pareil pour spitnolan