Macro valeur suivant motif cellule

Résolu
pygos Messages postés 202 Statut Membre -  
pygos Messages postés 202 Statut Membre -
Bonjour,

Je souhaite obtenir une macro qui indique la valeur "AU"
dans les cellules sélectionnées (F11:av53), à condition que le
motif (couleur cellule) soit égal à :


Font.ColorIndex = 2 (blanche)


Merci de m'aider !

pygos
A voir également:

2 réponses

Réponse 1 / 2
Patrice33740 Messages postés 8930 Statut Membre 1 781
 
Essaye : 

Dim Cellule As Excel.Range

For Each Cellule In Selection.Cells
  If Cellule.Font.ColorIndex = 2 Then
    Cellule.Formula = "au"
  End If
Next Cellule


Cordialement
0
Réponse 2 / 2
pygos Messages postés 202 Statut Membre
 
Merci pour la soluce !
0

Discussions similaires

Problème de restrictions
SuperAmbi -
Pat -

5 réponses
Cette valeur ne correspond pas aux restrictions
Sulphide -
Coolmaster -

3 réponses
Excel VBA : Récupérer la valeur d'une cellule
la pioche -
mikebzh -

3 réponses
additionner nombres dans cellules avec texte
kawimaki -
kawimaki -

6 réponses
restriction de valeur sur Excel
natalia -
hassan -

11 réponses