bonjour
voila une formule de excel que je voudrais retranscrire dans vb6
=SI(ET(M11="";N11="");L11;M11)
j'ai essayer de la retranscrire dans vb6
If Label4(2) = "" And Label4(1) = "" Then
Label6(3) = Label4(0) Or Label6(3) = Label4(2)
End If
mais ça ne fonctionne pas,j'ai soit une valeur négative ou la valeur de Label4(0),alors qui y à une valeur dans Label4(2)
ça c'est se qui correspont avec mes labels
M11 = Label4(2)
N11 = Label4(1)
L11 =  Label4(0)
j'espère avoir était assez clair
merci
petchy

Salut

en passant, essaye d'éviter d'accéder au proprité text des controle simplement en écrivant leurs nom (comme par exemple Label(0) au lieu de Label(0).text). Vb donne la possibilité de mettre par défaut une des méthode d'un objet mais il est plus clair à la relecture d'écrire la syntaxe complete. De plus en cas de changement de propriété par défaut, ton code ne sera plus compatible.

Enfin c'est simplement mon avis personnelle ...

A plus
Damien

salut,

http://www.vbfrance.com/infomsg_FORMULES-EXCEL-VERS-VB6_980586.aspx
Je suppose que tu as copié sans donc comprendre ^^ ?
SI, avec Excel, c'est IF avec VB/VBA, et ET = AND.
Bref, regarde dans l'aide de VB If et IIf.

@++

---

( Nouveau forum : Exclusivement Office & VBA

Re
merci à vous,c'est super
mortalino,si j'ai essayer de comprendre,car j'ai essayer de reproduire la formule,mais se n'est pas evident.
petchy

Ok,

n'hésite pas en cas de multiple paramètres, même lorsque c'est inutile, de mettre des parenthèse, ne serait-ce que par lisibilité.

Pour le Iif, en gros :

TonLabel6(3).Caption = IIf (condition à vérifier, si c'est vérifié bah égal à ça, pas vérifié donc autre valeur)

Donc avec le nom de tes Labels :

Labels6(3).Caption = Iif(Label4(2).Caption = vbNullString And _
        Label4(1).Caption = vbNullString, Label4(0).Caption, Label4(2).Caption)

@++

---

( Nouveau forum : Exclusivement Office & VBA

Re,
Bah moi aussi j'avais dit la même chose que DARKSIDIOUS ...
Sauf si tu as pris sa premiere idée.

@+: Ju£i€n
Pensez: Réponse acceptée

sans rancune jrivet : j'ai posté mon message sans voir le tiens !

Re,
oh non , sans rancune aucune

@+: Ju£i€n
Pensez: Réponse acceptée