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

Excel Discussion :

fonction macro excel


Sujet :

Excel

  1. #1
    Nouveau Candidat au Club
    Homme Profil pro
    Roboticien
    Inscrit en
    février 2017
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Seine et Marne (Île de France)

    Informations professionnelles :
    Activité : Roboticien
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : février 2017
    Messages : 1
    Points : 1
    Points
    1
    Par défaut fonction macro excel
    Bonjour,

    Je suis débutant dans le code et donc pas trop alaise.
    Je chercher à réaliser une macro qui fait la mise en forme conditionnel "égal à" d'une cellule active avec la cellule de gauche et que la fonction se répète à un nombre de cellule suivante que je définirais.

    Merci pour aide

    Sermag

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

    Informations professionnelles :
    Activité : Electrotechnicien

    Informations forums :
    Inscription : juillet 2016
    Messages : 2 938
    Points : 5 128
    Points
    5 128
    Par défaut
    Bonjour,

    Comme je ne connais pas la structure de votre tableau, j'ai fait comme si c'était un tableau classique, si par contre vous utilisez un tableau structuré il vous faudra adapter quelques lignes (DerLig, Plage_MFC).
    Le code pour ce que vous demandez:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Sub MFC()
        Dim Plage_MFC As Excel.Range, FC As Excel.FormatCondition
        Dim DerLig As Long
        DerLig = Range("A" & Rows.Count).End(xlUp).Row
        Range("B2").Select 'sélectionnez la première cellule sur laquelle doit s'appliquer la MFC
        Set Plage_MFC = Range("B2:B" & DerLig) 'la plage complète sur laquelle doit s'appliquer la MFC
        Plage_MFC.FormatConditions.Delete 'on efface les MFC existantes
        Set FC = Plage_MFC.FormatConditions.Add(Type:=xlExpression, Formula1:="=$B2=$A2") 'application de la formule en MFC, ici, vérifie si la cellule B = la cellule A
        FC.Interior.Color = RGB(146, 208, 80) 'application de la couleur de fond vert clair comme format conditionnel
        FC.Font.Color = RGB(255, 255, 255) 'application de la couleur de police en blanc comme format conditionnel
        Set Plage_MFC = Nothing ' on libère la mémoire
        Set FC = Nothing
    End Sub
    Cdlt

Discussions similaires

  1. Fonction macro excel VBA
    Par leosalex dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 04/08/2015, 15h48
  2. Macro Excel: Masquer ligne en fonction
    Par henrynv dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 29/06/2012, 17h38
  3. [XL-2007] Refaire des fonctions d'Excel par macro
    Par npo25 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 19/11/2010, 14h31
  4. [XL-2003] Comment utiliser les fonctions ESSBASE dans une macro excel ?
    Par kharon_rp dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 08/04/2010, 14h17
  5. [Macro Excel] Fonction qui calcule une formule dans une cellule
    Par Enthau dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 21/07/2008, 16h31

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