High-Tech Santé Médecine Droit-Finances

Test

Netbook HP mini 110

Rechercher : dans
Par :

[Excel ou VB?] MEFC modifiant autre cellule

Dernière réponse le 18 aoû 2006 à 19:29:28 greengrin, le 15 aoû 2006 à 15:02:33 
 Signaler ce message aux modérateurs

Bonjour,

Cela fait un bout de temps que je cherche une solution pour mettre en forme des cellules avec plus de 3 conditions sans trouver de réponse satisfaisante... (j'ai 5 conditions pour le moment)

Les mises en formes conditionnelles se limitent à 3 conditions, j'ai vu qu'il était possible de mettre en forme les cellules avant d'y appliquer des conditions mais cela ne solutionne pas mon souci, cela ne semble ne s'appliquer qu'au texte, alors que je cherche seulement à mettre un fond de couleur différente selon les valeurs contenues dans certaines autres cellules.

Tout ce que j'ai trouvé pour l'instant ce sont des macros pour modifier les cellules elles mêmes et non d'autres cellules cibles.


Le problème :

J'ai deux colonnes A et B, et je souhaiterait appliquer ces conditions sur toutes les cellules de A en fonction des cellules de B :

si B1 = haricot alors A1 est en fond vert
si B1 = tomate alors A1 est en fond rouge
si B1 = raisin alors A1 est en fond violet
si B1 = citron alors A1 est en fond jaune
si B1 = orange alors A1 est en fond orange
petit plus si possible : si B1 est différent de haricot, tomate, raisin, citron ou orange, alors n'appliquer aucune couleur de fond sur la cellule A1

et ainsi de suite sur A2 en fonction de B2, A3 en fonction de B3 etc etc...


Je vous remercie d'avance de m'apporter vos lumières car je suis un peu perdu!!
greengrin

Meilleures réponses pour « [Excel ou VB?] MEFC modifiant autre cellule » 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...
Tableur - Les cellules VoirLa notion de cellule On appelle "cellule" l'intersection entre une ligne (horizontale) et une colonne (verticale) de la feuille de calcul. Ainsi le nom de la ligne combiné au nom de la colonne donne les coordonnées d'une cellule (le terme d'adresse...
Posez votre question Répondre

1

Armojax, le 16 aoû 2006 à 18:30:58

Salut

"Tout ce que j'ai trouvé pour l'instant ce sont des macros pour modifier les cellules elles mêmes et non d'autres cellules cibles."

Eh oui, je pense qu'il faut que tu passes par une macro.

   
Répondre à Armojax

2

greengrin, le 18 aoû 2006 à 16:12:38

Oui je lepense aussi, mais comme je l'expliquais (plus ou moins clairement) dans mon message, celles que j'ai testées ne me donnent pas le resultat escompté...

   
Répondre à greengrin

3

Armojax, le 18 aoû 2006 à 17:56:48
  • +1

Copie ça dans le code de la feuille concernée (le code de Feuil1 par exemple) :

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column <> 2 Then Exit Sub
  Dim I As Long
  I = Target.Row
  Select Case UCase(Cells(I, 2).Value)
    Case "HARICOT": Cells(I, 1).Interior.ColorIndex = 4
    Case "TOMATE": Cells(I, 1).Interior.ColorIndex = 3
    Case "RAISIN": Cells(I, 1).Interior.ColorIndex = 39
    Case "ORANGE": Cells(I, 1).Interior.ColorIndex = 45
    Case "CITRON": Cells(I, 1).Interior.ColorIndex = 6
    Case Else: Cells(I, 1).Interior.ColorIndex = xlNone
  End Select
End Sub

   
Répondre à Armojax

4

 greengrin, le 18 aoû 2006 à 19:29:28

C'est EXACTEMENT ce que je recherchais!
et ça marche tip top!!

Enfin une solution fonctionne, Merci beaucoup pour ton aide!!

greengrin

   
Répondre à greengrin
Posez votre question Répondre
Ils ont besoin de votre aide