IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

attribuer une couleur automatiquement a une cellule


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Inscrit en
    Avril 2007
    Messages
    175
    Détails du profil
    Informations forums :
    Inscription : Avril 2007
    Messages : 175
    Points : 52
    Points
    52
    Par défaut attribuer une couleur automatiquement a une cellule
    Bonjour,

    je voudrais savoir si c'est possible de créer une macro qui donne une couleur spécifie a une cellule dés que

    le contenu de cette cellule = un mot spécifie

    exemple:

    si le contenue de la cellule active = Dupon => couleur de cellule rouge
    fin si
    si le contenue de la cellule active = Arnaud => couleur de cellule marron
    fin si

    Merci d'avance

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour

    Jusqu'à trois critéres tu peux utiliser la mise en forme conditionnelle, ensuite il va falloir passer par du VBA.

    Fais une recherche sur ce forum et les contributions VBA, je suis sûr que tu vas trouvé ton bonheur.

    Et si tu as la chance qu'Ouskel'n'or passe par là il va te pondre un code.

    Mais fais une recherche.

    Starec

  3. #3
    Membre du Club
    Inscrit en
    Avril 2007
    Messages
    175
    Détails du profil
    Informations forums :
    Inscription : Avril 2007
    Messages : 175
    Points : 52
    Points
    52
    Par défaut
    j'ai cherché sur le Forum mai j'ai rien trouvé , je vai continuer a chercher
    Merci

  4. #4
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    La mise en forme conditionnelle, c'est dans Excel
    Format -> Mise en forme conditionnelle
    Tu fais ça en enregistrant la macro et tu nous mets le code pour simplification. Sinon, c'est nous qui allons devoir le faire avec des conditions qu'on ne connaît peut-être pas exactement

    Citation Envoyé par Startreck
    Et si tu as la chance qu'Ouskel'n'or passe par là il va te pondre un code.
    Tu vas voir ce que je vais te pondre... Je suis un dodo mâle et les dodos mâles ne pondent pas, Meûssieur !

  5. #5
    Membre du Club
    Inscrit en
    Avril 2007
    Messages
    175
    Détails du profil
    Informations forums :
    Inscription : Avril 2007
    Messages : 175
    Points : 52
    Points
    52
    Par défaut
    Merci ouskel'n'or tu m'aide beaucoup dans mes petits applications
    j'ai pas le code de la macro par ce que je ne saias pas comment le faire.

    moi je veux par exemple quans je mai un texte (par exemple: forum), la cellule prend automatiquement une couleur que je choisie , j'aurais besoin de 7 critere peut être :
    exmple

    Jean => Rouge
    Michelle =>Bleu
    Emilie=>Marron

  6. #6
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    Je préfère t'apprendre à pêcher
    Pour enregistrer une macro, dans Excel, tu vas dans Outils -> Macro -> Nouvelle -> Te propose un nom de macro -> Ok
    Tu fais ce que tu veux faire, la macro enregistre (presque) tout. Quand tu as fini, tu fais un clic sur le carré Bleu marine dans la boîte à outils qui s'est affichée et tu as ta macro. Pour la voir -> Outils -> Macro -> Editeur VB -> Module1 ou 2 ou 3... elle est là. Tu verras, c'est magique ! Et ça va t'ouvrir des horizons nouveaux...
    Tu fais ça et tu nous reviens avec le code
    A+

  7. #7
    Membre du Club
    Inscrit en
    Avril 2007
    Messages
    175
    Détails du profil
    Informations forums :
    Inscription : Avril 2007
    Messages : 175
    Points : 52
    Points
    52
    Par défaut
    je veux associer a chaque Nom une couleur spécifie

    j'ai fait ce que tu ma demandé de faire et j'ai le code suivant
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
     
    Sub Macro1()
    '
    ' Macro1 Macro
    ' Macro enregistrée le 24/04/2007 par i017602
    '
     
    '
        Range("A1").Select
        ActiveCell.FormulaR1C1 = "Dupon"
        Range("A1").Select
        With Selection.Interior
            .ColorIndex = 6
            .Pattern = xlSolid
        End With
        Range("A2").Select
        ActiveCell.FormulaR1C1 = "DEV"
        With Selection.Interior
            .ColorIndex = 6
            .Pattern = xlSolid
        End With
        Selection.Interior.ColorIndex = 4
        Range("A3").Select
        ActiveCell.FormulaR1C1 = "Carmen"
        With Selection.Interior
            .ColorIndex = 5
            .Pattern = xlSolid
        End With
    End Sub

    mai moi je veux une macro qui vérifie toutes les cellules de la feuille et dés quelle trouve une cellule qui contient un nom que je met en condition elle couleur automatiquement la cellule selon la condition spécifie .

  8. #8
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    Non, là tu as modifié le format de tes cellules.
    J'ai écrit :
    La mise en forme conditionnelle, c'est dans Excel
    Format -> Mise en forme conditionnelle
    Et dans mise en forme conditionnelle, tu mets tes conditions.
    Nous n'avons pas ton fichier et, dans ces conditions, il nous est difficile de t'aider.
    Un truc comme ça
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
        Columns("B:B").Select
        Selection.FormatConditions.Delete
        Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
            Formula1:="VRAI"
        Selection.FormatConditions(1).Interior.ColorIndex = 3
        Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
            Formula1:="FAUX"
    Pour enregistrer tu sélectionnes la colonne concernée et tu mets tes conditions dans Format -> Mise en forme connditionnelle.
    Pour chaque condition, tu n'es pas obligé de saisir l'adresse d'une condition correspondante, seulement le mot concerné
    A+

Discussions similaires

  1. [XL-2007] ajouter une ligne automatiquement si tel cellule est remplie
    Par croky23 dans le forum Macros et VBA Excel
    Réponses: 17
    Dernier message: 24/01/2011, 00h19
  2. Réponses: 6
    Dernier message: 27/08/2010, 10h28
  3. Réponses: 1
    Dernier message: 12/05/2010, 12h14
  4. [XL-2003] copier une couleur automatiquement
    Par annad dans le forum Excel
    Réponses: 21
    Dernier message: 12/08/2009, 15h36
  5. copie d'une table Y d'une base A vers une table X d'une base
    Par moneyboss dans le forum PostgreSQL
    Réponses: 1
    Dernier message: 30/08/2005, 22h24

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo