Discussion :

[Esmax]

Bonjour,

Je voudrais realiser une condtion dans mon programme
Donc si ma case est coché j execute une partie (option) de mon programme

Je pensais à a creer une case est lorsque je double clic je rajoute :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
Private Sub xpCheck1_Click()
If xpCheck1.Value = Checked Then
     XLAOK = "True"
End If
 
End Sub

et ensuite dans mon programme rajouter la condition

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
If XLAOK = True Then
     xxxxxxxxx
      xxxx
  else
end if

Ma variable est definie dans la partie "Forms" avec le

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Public XLAOK As String

Mais par contre elle n'est pas reconnu dans la partie "Class modules"

Que faire ?

Finalement j'ai reussi a faire fonctionner mon programme

Le seul probleme qu'il me reste est que le programme possède 3 onglet et je voudrais qu'il s affiche sur mon 1er onglet et là il s'affiche sur le 3eme onglet

Je viens de tester
Merci

[SfJ5Rpw8]

Attention aux type de données :

ici

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Public XLAOK As String
 XLAOK = "True"

tu déclare est utilise ta variable comme une variable string (chaine) ...

alors que la :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If XLAOK = True Then

tu l'utilise comme une variable booléenne ( VRAI/FAUX)


voir
http://bbil.developpez.com/tutoriel/...-Variables#XII
http://gilmir.developpez.com/tutorie...oriel26/#LVIII