Vba prob algo
Résolu
batao
Messages postés
50
Date d'inscription
mercredi 27 avril 2005
Statut
Membre
Dernière intervention
15 mai 2006
-
12 mai 2006 à 10:24
batao Messages postés 50 Date d'inscription mercredi 27 avril 2005 Statut Membre Dernière intervention 15 mai 2006 - 12 mai 2006 à 11:25
batao Messages postés 50 Date d'inscription mercredi 27 avril 2005 Statut Membre Dernière intervention 15 mai 2006 - 12 mai 2006 à 11:25
4 réponses
batao
Messages postés
50
Date d'inscription
mercredi 27 avril 2005
Statut
Membre
Dernière intervention
15 mai 2006
12 mai 2006 à 11:25
12 mai 2006 à 11:25
Merci Econs
c'était le prob et les erreurs venaient du fait des deux if
avec un elese if c'est nickel !!!
If (Cells(i, 10).Value = 1 Or Cells(i,
10).Value 3 Or Cells(i, 10).Value 5 Or Cells(i, 10).Value = 6) And
(Cells(i + 2, 10).Value 2 Or Cells(i + 2, 10).Value 4) Then
Cells(i + 1, 11).Value = sheets("1").Cells(12, 8).Value
ElseIf (Cells(i, 10).Value 2 Or Cells(i, 10).Value 4) And (Cells(i
+ 2, 10).Value 1 Or Cells(i + 2, 10).Value 3 Or Cells(i + 2,
10).Value 5 Or Cells(i + 2, 10).Value 6) Then
Cells(i + 1, 11).Value = sheets("1").Cells(12, 8).Value
Else: Cells(i + 1, 11).Value = ""
End If
ça marche maintenant
Ciao
c'était le prob et les erreurs venaient du fait des deux if
avec un elese if c'est nickel !!!
If (Cells(i, 10).Value = 1 Or Cells(i,
10).Value 3 Or Cells(i, 10).Value 5 Or Cells(i, 10).Value = 6) And
(Cells(i + 2, 10).Value 2 Or Cells(i + 2, 10).Value 4) Then
Cells(i + 1, 11).Value = sheets("1").Cells(12, 8).Value
ElseIf (Cells(i, 10).Value 2 Or Cells(i, 10).Value 4) And (Cells(i
+ 2, 10).Value 1 Or Cells(i + 2, 10).Value 3 Or Cells(i + 2,
10).Value 5 Or Cells(i + 2, 10).Value 6) Then
Cells(i + 1, 11).Value = sheets("1").Cells(12, 8).Value
Else: Cells(i + 1, 11).Value = ""
End If
ça marche maintenant
Ciao
PCPT
Messages postés
13272
Date d'inscription
lundi 13 décembre 2004
Statut
Membre
Dernière intervention
3 février 2018
47
12 mai 2006 à 10:40
12 mai 2006 à 10:40
salut,
umm.... "somme en croix incrémentée" ?
sacrée question ^^
umm.... "somme en croix incrémentée" ?
sacrée question ^^
econs
Messages postés
4030
Date d'inscription
mardi 13 mai 2003
Statut
Membre
Dernière intervention
23 décembre 2008
25
12 mai 2006 à 10:45
12 mai 2006 à 10:45
Salut,
Il faut que tu remplaces tes "j" par 10, tes "k" par 11, ...
Si tu mets un nombre comme premier paramètre de Cells, le deuxième doit en être un aussi.
Il faut de plus placer des parenthèses :
If (Cells(i, 10).Value 1 Or Cells(i, 10 ).Value 3 Or Cells(i, 10).Value = 5 Or Cells(i, 10 ).Value = 6) And (Cells(i + 2, 10).Value =
2 Or Cells(i + 2, 10 ).Value = 4) Then
Cells(i + 1, 11).Value = ""
Else
Cells(i + 1, 11 ).Value = sheets(1).Cells(12, 8).Value
End If
Au niveau des parenthèses, il s'agit bien d'une série de condition ET d'une autre série.
(condition1 OU condition2) AND (condition3 OU condition4)
Manu
--------------------------------------------------------------------------------------------
Avant de poster un message, n'oubliez pas de consulter le
Il faut que tu remplaces tes "j" par 10, tes "k" par 11, ...
Si tu mets un nombre comme premier paramètre de Cells, le deuxième doit en être un aussi.
Il faut de plus placer des parenthèses :
If (Cells(i, 10).Value 1 Or Cells(i, 10 ).Value 3 Or Cells(i, 10).Value = 5 Or Cells(i, 10 ).Value = 6) And (Cells(i + 2, 10).Value =
2 Or Cells(i + 2, 10 ).Value = 4) Then
Cells(i + 1, 11).Value = ""
Else
Cells(i + 1, 11 ).Value = sheets(1).Cells(12, 8).Value
End If
Au niveau des parenthèses, il s'agit bien d'une série de condition ET d'une autre série.
(condition1 OU condition2) AND (condition3 OU condition4)
Manu
--------------------------------------------------------------------------------------------
Avant de poster un message, n'oubliez pas de consulter le
batao
Messages postés
50
Date d'inscription
mercredi 27 avril 2005
Statut
Membre
Dernière intervention
15 mai 2006
12 mai 2006 à 11:00
12 mai 2006 à 11:00
Il y a toujours des problèmes les conditions sont peut etre éronnées
il y a des cas qui ne sont pas réalisées
C'est la magie de la prog ou quoi !!!
il y a des cas qui ne sont pas réalisées
C'est la magie de la prog ou quoi !!!
