Ecrire formule "if" dans celulle

Résolu/Fermé
viclaet Messages postés 3 Date d'inscription jeudi 21 avril 2016 Statut Membre Dernière intervention 21 avril 2016 - 21 avril 2016 à 09:29
viclaet Messages postés 3 Date d'inscription jeudi 21 avril 2016 Statut Membre Dernière intervention 21 avril 2016 - 21 avril 2016 à 10:57
Bonjour,

Voici mon code :

For test = 1 To 5
For j = 1 to 20

Cells(4, j).Formula = "=If (Cells(4, 36+test) = 0,0,1 )"

Next j
Next test

J'ai bien compris que le problème se trouvait dans l'écriture de ma fonction "if" mais je n'ai pas réussi à trouver la syntaxe correcte sur internet.
De plus je ne veux pas utiliser un If...then car une fois la formule écrite je l'étend sur mes autres cellules.

J'espère que ce que je demande est possible.

Merci d'avance
A voir également:

3 réponses

melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
21 avril 2016 à 10:03
bonjour,




for test = 1 To 5
For j = 1 to 20


Cells(4, j).FormulaR1C1 = "=IF(R[4]C[" & 36 + test & "]=1,1,0)"


Next j
Next test
0
viclaet Messages postés 3 Date d'inscription jeudi 21 avril 2016 Statut Membre Dernière intervention 21 avril 2016
21 avril 2016 à 10:25
Super ça a fonctionné, j'ai cependant dû changer les valeurs entre crochets pour que ça corresponde mais parfait, merci beaucoup.

Comme j'ai simplifié mon programme j'aurai juste une dernière question :

Comment mettre une cellule fixe dans la formule? En effet, car si la condition est respectée je ne veux pas écrire 1 mais faire référence à une cellule qui ne changera pas en colonne tout au long de la boucle.

Cells(4, j).FormulaR1C1 = "=IF(R[0]C[" & test - 8 & "]=1,Cells(4,3),0)"

Et encore merci
0
melanie1324 Messages postés 1505 Date d'inscription vendredi 25 mai 2007 Statut Membre Dernière intervention 31 janvier 2018 154
21 avril 2016 à 10:44
Bonjour,

Il faut enlever les [ pour que la cellule soit fixe
0
viclaet Messages postés 3 Date d'inscription jeudi 21 avril 2016 Statut Membre Dernière intervention 21 avril 2016
21 avril 2016 à 10:57
C'est bon tout fonctionne!
Merci t'es au top :)
0