If T_1 =3D 10 then
If T_2 =3D 11 then
If T_3 =3D 11 then
ETC...
1)Cas
toutes les conditions doivent =EAtre remplies
combien de End IF
Et comment les placer
2)Cas
Un certain nombre de ces conditions peuvent =EAtre remplies, du moment qu=
e=20
le total des conditions remplies ne d=E9passe pas un certain total.
Ex:
Pour un total de conditions remplies de 3 n'importe qu'elle combinaison=20
de ces 10 conditions par 3 sera valable.
heu... entre deux End If, tu peux remettre ta pendule à l'heure, steplé, PST.... jps
"PST" a écrit dans le message de news: 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
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
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.
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
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" a écrit dans le message de news: 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
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" <pgjignorez@wanadoo.fr> a écrit dans le message de news: 46b700a8$0$25908$ba4acef3@news.orange.fr...
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.
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" a écrit dans le message de news: 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
garnote
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" a écrit dans le message de news: 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
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" <pgjignorez@wanadoo.fr> a écrit dans le message de news: 46b700a8$0$25908$ba4acef3@news.orange.fr...
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.
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" a écrit dans le message de news: 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
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" a écrit dans le message de news: 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
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" <pgjignorez@wanadoo.fr> a écrit dans le message de news:
46b700a8$0$25908$ba4acef3@news.orange.fr...
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.
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" a écrit dans le message de news: 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
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...
Pour un total de conditions remplies de 3 n'importe qu'elle combinaiso n de ces 10 conditions par 3 sera valable.
merci
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...
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...
Pour un total de conditions remplies de 3 n'importe qu'elle combinaiso n de ces 10 conditions par 3 sera valable.
merci
PST
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...
Pour un total de conditions remplies de 3 n'importe qu'elle combinaison de ces 10 conditions par 3 sera valable.
merci
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...
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...