10 If & total if

Le
PST
Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du moment qu=
e
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaison
de ces 10 conditions par 3 sera valable.

merci
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
jps
Le #4811571
bonjour PST
pour le Cas 1)
un seul End If suffit en écrivant ainsi :

Sub test()
If T_1 = 10 And T_2 = 11 And T_3 = 11 Then
MsgBox "toto"
End If
End Sub

d'autres diront qu'il y a peut-être encore plus simple avec un Array mais je
ne connais pas assez
HTH
jps

"PST" 46b700a8$0$25908$
Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du moment que
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaison
de ces 10 conditions par 3 sera valable.

merci
jps
Le #4811541
heu... entre deux End If, tu peux remettre ta pendule à l'heure, steplé,
PST....
jps

"PST" 46b700a8$0$25908$
Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du moment que
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaison
de ces 10 conditions par 3 sera valable.

merci
FFO
Le #4811531
Salut PST
Pour ton 2° cas je verrais ceci :
If T_1 = 10 then
n = n+1
End if
If T_2 = 11 then
n = n+1
End if
If T_3 = 11 then
n = n+1
End if
If T_4 = 10 then
n = n+1
End if
Etc...

If n = 3 then
conséquence....
End if

Celà devrait faire

Dis moi !!!!


Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du moment que
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaison
de ces 10 conditions par 3 sera valable.

merci



garnote
Le #4811471
Bonjour PST,

Peut-être ainsi :

Sub sisi()
'Au moins n conditions sont remplies
n = 4
If T_1 = 1 Then t = t + 1
If T_2 = 6 Then t = t + 1
If T_3 = 7 Then t = t + 1
If T_4 = 3 Then t = t + 1
If T_5 = 9 Then t = t + 1
If t >= n Then MsgBox "OK" Else MsgBox "Pas OK"
End Sub

Serge



"PST" Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du moment que
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaison
de ces 10 conditions par 3 sera valable.

merci
garnote
Le #4811401
Bonjour PST,

Je crois que c'est plutôt ça que tu veux :

Sub sisi()
'Exactement n conditions sont remplies
n = 4
If T_1 = 1 Then t = t + 1
If T_2 = 6 Then t = t + 1
If T_3 = 7 Then t = t + 1
If T_4 = 3 Then t = t + 1
If T_5 = 9 Then t = t + 1
If t = n Then MsgBox "OK" Else MsgBox "Pas OK"
End Sub

Serge



"PST" Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du moment que
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaison
de ces 10 conditions par 3 sera valable.

merci



PST
Le #4811391
Je voulais savoir si il n'y avait pas un moyen d'éviter les and,une
condition sur une ligne prend déjà beaucoupe de place et il peut il y
avoir beaucoup plus que 10.
If T_1 = 10, syntaxe plus longue en réalité
Pour s'y retrouver ensuite

Je pensais à un système de total , chaque condition réussie = 1 p uis total



bonjour PST
pour le Cas 1)
un seul End If suffit en écrivant ainsi :

Sub test()
If T_1 = 10 And T_2 = 11 And T_3 = 11 Then
MsgBox "toto"
End If
End Sub

d'autres diront qu'il y a peut-être encore plus simple avec un Array
mais je ne connais pas assez
HTH
jps

"PST" 46b700a8$0$25908$
Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du moment que
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaison
de ces 10 conditions par 3 sera valable.

merci


PST
Le #4811381
Merci

Je vais essayer la solution n = n+1
Elle fonctionne normalement dans les 2 cas , suffit de compter le nombre
total de condition et de mettre la valeur max pour avoir toutes les
conditions


Salut PST
Pour ton 2° cas je verrais ceci :
If T_1 = 10 then
n = n+1
End if
If T_2 = 11 then
n = n+1
End if
If T_3 = 11 then
n = n+1
End if
If T_4 = 10 then
n = n+1
End if
Etc...

If n = 3 then
conséquence....
End if

Celà devrait faire

Dis moi !!!!


Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du mom ent que
le total des conditions remplies ne dépasse pas un certain total.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle combinaiso n
de ces 10 conditions par 3 sera valable.

merci





PST
Le #4810981
Fonctionne comme je le voulais

merci

Merci

Je vais essayer la solution n = n+1
Elle fonctionne normalement dans les 2 cas , suffit de compter le nombr e
total de condition et de mettre la valeur max pour avoir toutes les
conditions


Salut PST
Pour ton 2° cas je verrais ceci :
If T_1 = 10 then
n = n+1
End if
If T_2 = 11 then
n = n+1
End if
If T_3 = 11 then
n = n+1
End if
If T_4 = 10 then
n = n+1
End if
Etc...

If n = 3 then
conséquence....
End if

Celà devrait faire

Dis moi !!!!


Bonjour

10 if

ex:

If T_1 = 10 then
If T_2 = 11 then
If T_3 = 11 then
ETC...

1)Cas
toutes les conditions doivent être remplies
combien de End IF
Et comment les placer

2)Cas
Un certain nombre de ces conditions peuvent être remplies, du mo ment
que le total des conditions remplies ne dépasse pas un certain t otal.

Ex:

Pour un total de conditions remplies de 3 n'importe qu'elle
combinaison de ces 10 conditions par 3 sera valable.

merci








Publicité
Poster une réponse
Anonyme