Demande d'une macro pour cellule choisi passe onglet en couleur
Résolu/Fermé
A voir également:
- Demande d'une macro pour cellule choisi passe onglet en couleur
- Mot de passe administrateur freebox ✓ - Forum Freebox
- Macro logiciel - Télécharger - Organisation
- Piratage facebook changer mot de passe - Guide
- Excel colorer une cellule sous condition d'une autre cellule ✓ - Forum Excel
- Somme si couleur - Guide
2 réponses
eriiic
Messages postés
24513
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
25 mars 2023
7 168
30 nov. 2012 à 15:08
30 nov. 2012 à 15:08
Bonjour,
à mettre dans Thisworkbook :
Le changement de couleur a lieu lors de la modification de E44.
https://www.cjoint.com/?BKEpivDVpno
eric
à mettre dans Thisworkbook :
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Left(Sh.Name, 4) = "SF02" And Target = [E44] Then
Select Case LCase([E44])
Case "levée"
Sh.Tab.ColorIndex = 4
Case "non levée"
Sh.Tab.ColorIndex = 3
Case "déclassée"
Sh.Tab.ColorIndex = 6
Case Else
Sh.Tab.ColorIndex = xlNone
End Select
End If
End Sub
Le changement de couleur a lieu lors de la modification de E44.
https://www.cjoint.com/?BKEpivDVpno
eric