Rechercher : dans
Par :

Excel macro boucle if sur plusieurs cellules

Dernière réponse le 11 jui 2008 à 11:19:28 jossdi, le 11 jui 2008 à 10:04:40 
 Signaler ce message aux modérateurs

Bonjour,
j'ai un petit problème pour faire une boucle if sur plusieurs cellulesi:
une boucle if sur une seule cellule c cool voici le code:
Sub norms()
Sheets("TECHNOLOGY DETAIL").Activate
If Cells(5, 2).Interior.ColorIndex = 6 Then
Cells(57, 3).Value = ""
End If
End Sub

par contre ça se complique si je veux vérifier si plusieurs cellules sont jaunes (colorindex=6)
j'ai essayé ça:
Sub norms()
For i = 5 To 7
Sheets("TECHNOLOGY DETAIL").Activate
If Cells(i, 2).Interior.ColorIndex = 6 Then
Cells(57, 3).Value = ""
End If
Next i
End Sub
résultat nul
quelqu'un pourrait me dire ce qui cloche please
Yohann

Configuration: Windows XP
Firefox 2.0.0.15

Meilleures réponses pour « excel macro boucle if sur plusieurs cellules » dans :
[Excel] Colorer des cellules sur conditions VoirIl existe dans Excel des fonctions très pratiques mais peu connues et peu utilisées. Exemple : vous souhaitez qu'une cellule se colore automatiquement en rouge (ou autre mise en forme de police, de bordure, de trame) selon une condition : un...
Télécharger MOREFUNC (Macro complémentaire EXCEL) VoirMorefunc est une macro complémentaire proposant 67 nouvelles fonctions de feuille de calcul pour Excel. Ces fonctions sont compatibles avec Excel 95 à 2007. Elles ne sont pas portables sur d'autres plate-formes que Windows, ni sur d'autres...
Copier une formule VoirAprès avoir laborieusement composé une formule dans une cellule, il est fréquent de vouloir la recopier d’autres cellules. Vous pouvez procéder de plusieurs façons. COPIER-COLLER La méthode la plus primaire consiste à sélectionner la cellule...

1

zavenger, le 11 jui 2008 à 10:07:46

résultat nul : ce n'est pas tres precis comme description de probleme. tu peux expliquer ce que cela devrait faire et ce que cela fait stp?

Répondre à zavenger

2

jossdi, le 11 jui 2008 à 10:21:06

Mon but est d'effacer le contenu d'une cellule si un groupe de cellules bien précis est jaune.

Répondre à jossdi

3

zavenger, le 11 jui 2008 à 10:24:00

La macro que tu as ecrite efface la cellule C57 si B5, B6 ou B7 sont jaunes. ce n'est pas ce que tu veux?

Répondre à zavenger

4

jossdi, le 11 jui 2008 à 10:34:12

Oui tout à fait

Répondre à jossdi

5

zavenger, le 11 jui 2008 à 10:40:21

Et donc quést ce qui ne marche pas?

Répondre à zavenger

6

jossdi, le 11 jui 2008 à 10:55:16

Ben quand je lance la macro la cellule ne s'efface pas

Répondre à jossdi

7

zavenger, le 11 jui 2008 à 11:01:20

Chez moi ci

Sub norms()
For i = 5 To 7
If Cells(i, 2).Interior.ColorIndex = 6 Then
Cells(5, 3).Value = ""
End If
Next
End Sub


marche

Répondre à zavenger

8

jossdi, le 11 jui 2008 à 11:16:43

Effectivement ça fonctionne surement une mauvais manip de ma part...
excuse de t'avoir fait perdre ton temps
merci bonne journée

Répondre à jossdi

9

 zavenger, le 11 jui 2008 à 11:19:28
  • +2

Pas de prob.

Répondre à zavenger
Collection CommentÇaMarche.net