Affecter une valeur en fonction d'un format
billou
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je suis à la recherche d'une fonction ou d'une macro qui permette d'affecter une valeur à une cellule en fonction du format de celle ci (l'inverse du formatage conditionnel) à savoir:
si le motif d'arrière plan est rouge: valeur 1
Merci d'avance
je suis à la recherche d'une fonction ou d'une macro qui permette d'affecter une valeur à une cellule en fonction du format de celle ci (l'inverse du formatage conditionnel) à savoir:
si le motif d'arrière plan est rouge: valeur 1
Merci d'avance
A voir également:
- Affecter une valeur en fonction d'un format
- Format epub - Guide
- Format factory - Télécharger - Conversion & Codecs
- Fonction si et - Guide
- Hp usb disk storage format tool - Télécharger - Stockage
- Format apfs - Guide
2 réponses
Bonsoir,
Function coter_couleur(cellule As Range)
Dim couleur As Byte
couleur = cellule.Interior.ColorIndex
Select Case couleur
Case Is = 3 'rouge
coter_couleur = "A"
Case Is = 35 'vert pale
coter_couleur = 123
'...
End Select
End Function
Function coter_couleur(cellule As Range)
Dim couleur As Byte
couleur = cellule.Interior.ColorIndex
Select Case couleur
Case Is = 3 'rouge
coter_couleur = "A"
Case Is = 35 'vert pale
coter_couleur = 123
'...
End Select
End Function