help sur formule pourexcel 2003 svp - Logiciels - Windows & Software
Marsh Posté le 27-06-2006 à 20:26:48
Bonsoir
Je pense qu'il faut utiliser une macro. J'ai essayé d'en créer une mais elle ne fonctionne pas vraiment. Tout du moins ,elle met bien zéro mais elle l'écrit partout.
Je n'arrive pas à écrire en VBA, si la cellule est coloriée, alors écrire 1.
C'est quelque chose du genre Else...je pense
Dans le meilleur des cas, il faut perfectionner ce code. Dans le pire, il faut en écrire un autre ou chercher une autre piste. Un membre pourra peut-être t'aider.
Sub Macro()
For i = 1 To N° de la dernière ligne
For j = 1 To N° de la dernière colonne
With Selection.Interior
If .ColorIndex = xlNone Then
'Si la cellule n'a pas de couleur
Cells(i, j+4) = 0
'Alors, écrire 0 dans la 5è colonne par ex si ta dernière colonne est la 4
Else: Cells(i, j + 4) = 1
'Sinon, écrire 1
'Je ne sais pas pourquoi, il ne prend pas en compte cette intsruction
End If
End With
Next j
Next i
End Sub
Marsh Posté le 27-06-2006 à 13:46:44
Hello,
je cheche une formule pour faire un compteur sous excel svp :
si dans une ligne une cellule a un fond coloré alors ça compte pour "1"
et si elle reste avec le fond blanc alors ça compte pour "zéro"
et donc, la formule qui serait dans la derniere colonne de la ligne me donnerait le total des cellules non blanche
merci d'avance à ceux qui maitrisent ...