rendre inactive une liste
Bonjour à tous,
J'ai deux listes et suivant la valeur de la première liste, je dois rendre l'autre inactive et la griser.
La première liste se trouve en B5. Si elle prend la valeur "AKG" alors la liste située en C5 doit être inactive et grisée.
J'ai essayé de bidouiller moi même mais ça ne marche pas. Pourriez-vous svp m'aider? et surtout : où dois-je placer ce code??? (je dois sélectionner la liste en C5 et l'associer à mon code?)
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| Sub GriserCellule()
couleur = C5.BackColor
Dim coul As Long
If B5 = AKG Then
test = False
coul = &H8000000F
Else
test = True
coul = couleur
End If
C5.Enabled = test
With C5
.Enabled = test
.BackColor = coul
End With
End Sub |
merci pour votre aide :)
Aud- (débutante)