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 :

Mise en forme Conditionnelle


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Ingénieur Etudes
    Inscrit en
    Juillet 2011
    Messages
    52
    Détails du profil
    Informations personnelles :
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Ingénieur Etudes
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Juillet 2011
    Messages : 52
    Par défaut Mise en forme Conditionnelle
    Bonjour tout le monde et bonne année,
    Longue vie au forum

    Mon problème est le suivant: lorsque je définis la Mise en forme conditionnelle des cellules via un code VBA, ça ne marche pas !!! Pourtant quand j'entre les conditions "manuellement" ça tourne bien...

    Voici le code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    code = 64 + n
    Cells(m, n).FormatConditions.Add Type:=xlExpression, Formula1:="ET(" & Chr(code) & "18>=C" & m & ";" & Chr(code) & "18<=D" & m & ")"
    Selection.FormatConditions(1).Font.ColorIndex = 1
    With Selection.FormatConditions(1).Interior
                  .ColorIndex = 35
                  .Pattern = xlSolid
    End With
    pourriez vous m'aider ????? svp

  2. #2
    Membre Expert Avatar de ZebreLoup
    Homme Profil pro
    Ingénieur Financier
    Inscrit en
    Mars 2010
    Messages
    994
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Activité : Ingénieur Financier
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2010
    Messages : 994
    Par défaut
    Je ne suis pas sûr, mais il me semble qu'il faut que tu entres les formules avec une syntaxe Anglo-Saxonne.

    Et tu utilises Selection au lieu de Cells(m, n) pour la mise en forme

  3. #3
    Membre confirmé
    Profil pro
    Ingénieur Etudes
    Inscrit en
    Juillet 2011
    Messages
    52
    Détails du profil
    Informations personnelles :
    Localisation : France, Seine Saint Denis (Île de France)

    Informations professionnelles :
    Activité : Ingénieur Etudes
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Juillet 2011
    Messages : 52
    Par défaut
    Merci pour ta réponse, j'ai essayé Selection au lieu de Cells(m,n) mais ce n'est pas mieux qu'avant...
    Qu'est ce que c'est la syntaxe anglo-saxonne ?? je ne vois pas trop ce que ça peut être...

    Merci encore

  4. #4
    Membre Expert Avatar de ZebreLoup
    Homme Profil pro
    Ingénieur Financier
    Inscrit en
    Mars 2010
    Messages
    994
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Activité : Ingénieur Financier
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2010
    Messages : 994
    Par défaut
    Après vérification j'ai dis une bêtise pour la syntaxe anglosaxonne. C'est seulement quand tu touches à la propriété Formula d'un range, plutôt que FormulaLocal. Il aurait fallu mettre un AND au lieu d'un ET et des virgules au lieu des points-virgules, mais ça n'est pas le cas ici.

    Et sinon, je te conseillais l'inverse, utiliser Cells(m, n) là où tu avais mis Selection. Car sinon, tu ajoutes une MFC à la cellules m,n, et tu choisis la couleur pour la cellule active, qui n'est pas forcément celle-là...

  5. #5
    Membre Expert Avatar de ZebreLoup
    Homme Profil pro
    Ingénieur Financier
    Inscrit en
    Mars 2010
    Messages
    994
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Val de Marne (Île de France)

    Informations professionnelles :
    Activité : Ingénieur Financier
    Secteur : Finance

    Informations forums :
    Inscription : Mars 2010
    Messages : 994
    Par défaut
    Essaie de cette façon :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Cells(m, n).FormatConditions.Add Type:=xlExpression, _
        Formula1:="=ET(" & Cells(18, n).Address & ">=" & Cells(m, "C").Address & _
        ";" & Cells(18, n).Address & "<=" & Cells(m, "D").Address & ")"
     
    With Cells(m, n).FormatConditions(1)
        .Font.ColorIndex = 1
        .Interior.ColorIndex = 35
        .Interior.Pattern = xlSolid
    End With
    Ça t'évite de passer par le code ASCII

Discussions similaires

  1. mise en forme conditionnelle et vba
    Par malabar92 dans le forum Access
    Réponses: 4
    Dernier message: 26/04/2006, 14h18
  2. Mise en forme conditionnelle
    Par the big ben 5 dans le forum Composants VCL
    Réponses: 4
    Dernier message: 23/12/2005, 15h20
  3. [VBA][Excel] mise en forme conditionnelle
    Par titflocon dans le forum Access
    Réponses: 9
    Dernier message: 19/12/2005, 10h13
  4. Réponses: 4
    Dernier message: 15/11/2005, 18h53
  5. Mise en forme conditionnelle en VBA / Cut-Paste
    Par priest69 dans le forum IHM
    Réponses: 4
    Dernier message: 03/09/2005, 13h54

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