Déclencher une macro événementielle

Fermé

cpa6675 - 25 sept. 2008 à 17:07
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 25 sept. 2008 à 20:48

Bonjour,

J'ai une feuille Excel comportant 8 colonnes (de A à H).

J'ai choisi une couleur de police rouge pour les colonnes A à G.

Dans la colonne H, j'ai mis en place une liste de choix comprenant 2 éléments ("PLANIFIE" et "CONFIRME").

Je souhaite créer une macro événementielle pour que, à chaque fois que je choisirai l'élément "CONFIRME", l'ensemble de la ligne sur laquelle se trouve cet élément passe à la couleur bleue.

Vous trouverez ci-dessous le code que j'ai écrit à la lecture des différents éléments recueillis sur le net.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 8 Then
If Range("H" & Target.Row) = "CONFIRME" Then Target.EntireRow.Font.Color = vbBlue
End If
End Sub

Cela ne fonctionne pas. Alors si quelqu'un peut me dépanner, merci d'avance.

A voir également:

Déclencher une macro événementielle
Macro word - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Macro logiciel - Télécharger - Organisation
Macro recorder - Télécharger - Confidentialité
Déclencher appareil photo android à distance - Guide

2 réponses

Réponse 1 / 2

toto
25 sept. 2008 à 18:17

Bonjour

Elle marche bien chez moi cette macro, sans changer la moindre virgule.
L'as-tu bien mise dans le module associé à la feuille - pas le module ThisWorkbook ?

Réponse 2 / 2

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 302
25 sept. 2008 à 20:48

Bonsoir,

a essayer:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 8 Then
If target= "CONFIRME" Then
Target.EntireRow.Font.Colorindex = 5
End If
End If
End Sub

Discussions similaires

faire une boucle sans VBA

Transformer un chiffre en lettres dans excel sans macro

Copie automatique tableau Excel sans macro

recup couleur de cellule sans macro

macro en fonction de la valeur d'une cellule

Discussions similaires

Newsletters