Macro valeur suivant motif cellule

Résolu

pygos Messages postés 202 Statut Membre -
pygos Messages postés 202 Statut Membre - 25 juin 2010 à 15:26

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

Afficher la suite

A voir également:

Macro valeur suivant motif cellule
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Proteger cellule excel - Guide
Vba récupérer valeur cellule ✓ - Forum VB / VBA
Cette valeur ne correspond pas aux restrictions de validation des données pour cette cellule ✓ - Forum Excel
Valeur relative et absolue ✓ - Forum Webmastering

2 réponses

Réponse 1 / 2

Patrice33740 Messages postés 8400 Date d'inscription Statut Membre Dernière intervention 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

Réponse 2 / 2

pygos Messages postés 202 Statut Membre

Merci pour la soluce !

Discussions similaires

Cette valeur ne correspond pas aux restrictions

Problème de restrictions

restriction de valeur sur Excel

Copier automatiquement la valeur d'une cellule

Excel formule : savoir si une cellule contient partie texte

Discussions similaires

Newsletters