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 :

Mettre une formule Excel en macro [XL-365]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Homme Profil pro
    Directeur de projet
    Inscrit en
    Juillet 2018
    Messages
    50
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Essonne (Île de France)

    Informations professionnelles :
    Activité : Directeur de projet
    Secteur : Distribution

    Informations forums :
    Inscription : Juillet 2018
    Messages : 50
    Par défaut Mettre une formule Excel en macro
    Bonjour,
    je voudrais savoir comment transformer une formule Excel en macro :
    formule Excel:

    Code formule : Sélectionner tout - Visualiser dans une fenêtre à part
    =SI(ET((P2*Q2*R2)>=1;(P2*Q2*R2)<=19);"Low";SI(ET((P2*Q2*R2)>=20;(P2*Q2*R2)<=34);"Medium";SI(ET((P2*Q2*R2)>=35;(P2*Q2*R2)<=49);"High";SI(ET((P2*Q2*R2)>=50;(P2*Q2*R2)<=64);"High";""))))

    Merci de votre collaboration et de vos retour.
    Bien cordialement.
    MamaB

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    En utilisant la méthode Evaluate et en utilisant la version anglophone des fonctions.
    Lire ça : https://docs.microsoft.com/fr-fr/off...ation.evaluate

  3. #3
    Expert confirmé
    Homme Profil pro
    Electrotechnicien
    Inscrit en
    Juillet 2016
    Messages
    3 241
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 71
    Localisation : France, Var (Provence Alpes Côte d'Azur)

    Informations professionnelles :
    Activité : Electrotechnicien

    Informations forums :
    Inscription : Juillet 2016
    Messages : 3 241
    Par défaut
    Bonjour,

    Petite remarque concernant votre formule et plus particulièrement la partie ;
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    SI(ET((P2*Q2*R2)>=35;(P2*Q2*R2)<=49);"High";SI(ET((P2*Q2*R2)>=50;(P2*Q2*R2)<=64);"High"
    cela ne revient-il pas à écrire:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    SI(ET((P2*Q2*R2)>=35;(P2*Q2*R2)<=64);"High"
    Vous pouvez simplifier la formule complète par:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =SI(OU((P2*Q2*R2)<1;(P2*Q2*R2)>64);"";SI((P2*Q2*R2)<20;"Low";SI((P2*Q2*R2)<35;"Medium";"High")))
    Quant à sa conversion en VBA, hormis la proposition de Menhir, vous pourriez utiliser l'enregistreur de macro.

    Cdlt

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

Discussions similaires

  1. [XL-2007] Transformer une formule excel en macro
    Par cocole27 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 05/12/2015, 10h58
  2. mettre une formule excel dans une cellule
    Par spoyet dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 09/02/2012, 15h11
  3. mettre une formule excel dans une cellule
    Par spoyet dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 09/02/2012, 09h52
  4. Macro pour activer une formule excel
    Par arkorrigan dans le forum Macros et VBA Excel
    Réponses: 16
    Dernier message: 19/03/2010, 09h42
  5. Réponses: 2
    Dernier message: 27/08/2008, 19h09

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