[E-07] Condition incorrecte

Bonjour
Je débute en VB et je rencontre un petit probleme.
Voila pour m'entrainer je crée des petites applications mais cette derniere me cause un petit soucis.

Je déclare 3 variables va1,val2,val3 auquel j'attribu une valeur quelconque grace a Rnd.Ensuite je veux que lorsque ces 3 valeurs sont identiques un message s'affiche, le probleme c'est que le message ne s'affiche pas lorsque ma condition est suffisante mais lorsque val3=0!
A quoi cela est du ??
Merci d'avance et bonne soirée

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Private Sub CommandButton1_Click()   Dim val1 As Integer Dim val2 As Integer Dim val3 As Integer   val1 = Rnd * 10 Label1.Caption = val1   val2 = Rnd * 10 Label2.Caption = val2   val3 = Rnd * 10 Label3.Caption = val3   If (val1 = val2 = val3) Then MsgBox ("bonjour") End If   End Sub

---

Bonsoir,

Code:

---

1 2 3

If val1 = val2 And val2 = val3 then msgbox "à bucher : opérateur AND" end if

---

Ton expression

Code:

---

If (val1 = val2 = val3) Then

---

Est comprise par vb comme si tu avais ecrit ceci

Code:

---

1 2	Val1 = (Val2 = Val3) ' Val1 vaudra true ou false If val1 = true Then

---

C'est plutôt ça que comprend VB. ;)

Code:

---

1 2 3

if ((val1=val2)=val3) then msgbox "Val1 et val2 sont différents et val3 est nul, ou val1 et val2 sont égaux et val3 vaut 1." end if

---

Ce qui explique pourquoi ça ne marche que quand val3 vaut 0, puisque val1 et val2 sont quasiment à coup sûr différents. ;)

Ok bien entendu. Merci pour vos réponses claires et rapides.
Par contre j'ai un deuxieme petit soucis, j'arrive a ouvrir mon projet mais pas a l'executer. VB d'excel m'ecrit que les macros pour ce projet sont désactivées et qu'il faut les activer.

C'est très simple.

Tu vas dans Outils->Options, puis dans l'onglet "Sécurité", tu cliques sur le bouton "Sécurité des macros", tu règles le niveau de sécurité sur "Niveau de sécurité faible (non recommandé)", et là ça marchera. ;)

tu programmes donc en VBA Excel et non pas en VB6 ?

Je n'est pas d'onglet sécurité dans mes options.
Je travail sous VB Excel 2007 et non VB6. Quelle est la différence entre les 2?

C'est ce qu'on appelle du VBA (Visual Basic for Application), je transfère ce sujet sur le bon forum.

Moi je supposais sue tu bossais sous le pack office 2003, pas sur le 2007 (avec lequel je suis résolument faché).

Sous le pack office 2007 ça doit bien se trouver quelque part: cherche un peu!

PS: et puis honnêtement, VB ou VBA dans le fond ça marche pareil...

Bonjour

En Excel 2007, Bouton Office/Options Excel/Centre de gestion de la confidentialité/Paramètres du centre de gestion de la confidentialité/Paramètres des macros

Tu peux aussi afficher l'onglet Développeur dans le ruban et tu as alors accès via le ruban aux options de sécurité. Pour afficher l'onglet, bouton Office/Options Excel/Standard/Afficher l'onglet Développeur dans le ruban