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 :

MEFC formule Equiv [XL-2010]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé
    Femme Profil pro
    reconversion en cours
    Inscrit en
    Juillet 2009
    Messages
    637
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : reconversion en cours
    Secteur : Conseil

    Informations forums :
    Inscription : Juillet 2009
    Messages : 637
    Par défaut MEFC formule Equiv
    Bonjour,
    J'ai des mises en forme conditionnelle manuelles qui fonctionnent très bien, mais on me demande régulièrement de modifier la plage d'application.
    Pour me simplifier la tache j'ai voulu passer par VBA, mais je n'arrive pas à traduire la formule ci-après en VBA
    j'ai essayé :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Application.Union(Range("C5:AG23"), Range("C25:AG27"), Range("C29:AG148")).Select
    With Selection
        .FormatConditions.Delete
          .FormatConditions.Add Type:=xlExpression, Formula1:="=EQUIV(C$4;FERIES;0)>"
    End With
    J'obtiens l'erreur suivante : "argument ou appel de procédure incorrect" sur la ligne FormatCondition.Add.
    j'ai essayé pleins d'autres choses, comme
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    .FormatConditions.Add Type:=xlCellValue, Operator:=xlExpression, _
            Formula1:="=EQUIV(C$4;FERIES;0)>0"
    Mais j'ai toujours des erreurs avec des motifs différents...

    Est-ce que quelqu'un peut m'aider svp.
    Merci d'aavance

  2. #2
    Membre éprouvé
    Homme Profil pro
    Technicien bureau d'études
    Inscrit en
    Novembre 2015
    Messages
    118
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Technicien bureau d'études

    Informations forums :
    Inscription : Novembre 2015
    Messages : 118
    Par défaut
    Bonjour Mouftie.

    Tu peux essayer avec le code suivant :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    With Application.Union(Range("C5:AG23"), Range("C25:AG27"), Range("C29:AG148"))
        .FormatConditions.Delete
        .FormatConditions.Add Type:=xlExpression, Formula1:="=EQUIV(C$4;FERIES;0)>0"
    End With

  3. #3
    Membre éprouvé Avatar de graphikris
    Homme Profil pro
    Pas tres doué
    Inscrit en
    Décembre 2012
    Messages
    1 222
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Pas tres doué
    Secteur : Conseil

    Informations forums :
    Inscription : Décembre 2012
    Messages : 1 222
    Par défaut
    salut,
    Ne te compliques pas la tète avec des macros, transforme les données qui sont dans tes cellules en tableau;
    Si tes données sont de A1 à G51, sélectionnes les puis fais dans le menu "Insertion" choisis "Tableau".
    A chaque fois qu'une nouvelle ligne sera créé (avec la touche "Tab"), alors tes MEFC s'incrémenteront

  4. #4
    Membre éclairé
    Femme Profil pro
    reconversion en cours
    Inscrit en
    Juillet 2009
    Messages
    637
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : reconversion en cours
    Secteur : Conseil

    Informations forums :
    Inscription : Juillet 2009
    Messages : 637
    Par défaut
    Bonjour thebenoit59
    Merci pour ta réponse, cela répond parfaitement à ma demande.

    Bonjour graphikris
    Merci également de m'avoir répondu, mais il s'agit d'une base de planification d'activités, qui sert à différentes structures ; dont le premier exemplaire a été mon premier travail de développement. Aujourd'hui, j'utilise le plus possible les tableaux, mais dans ce cas, je ne peux pas revenir en arrière.

    Bonne journée à tous

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [Toutes versions] formule avec equiv
    Par alsimbad dans le forum Excel
    Réponses: 5
    Dernier message: 17/06/2010, 19h16
  2. Réponses: 10
    Dernier message: 28/01/2010, 12h26
  3. [E-07] Difficulté avec la formule index/equiv
    Par Bloubee dans le forum Excel
    Réponses: 5
    Dernier message: 03/11/2008, 10h24
  4. [Formule]fonction recherche ou equiv?
    Par poney01 dans le forum Excel
    Réponses: 2
    Dernier message: 27/04/2007, 20h46
  5. [Formule]problème avec EQUIV et RECHERCHEV
    Par JPM58 dans le forum Excel
    Réponses: 7
    Dernier message: 23/04/2007, 16h43

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