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 :

Colorer des cellules en fonction d'une date entrée dans une "box"


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Nouveau candidat au Club
    Homme Profil pro
    Libraire
    Inscrit en
    Septembre 2019
    Messages
    1
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Libraire
    Secteur : Boutique - Magasin

    Informations forums :
    Inscription : Septembre 2019
    Messages : 1
    Par défaut Colorer des cellules en fonction d'une date entrée dans une "box"
    Bonjour,

    Je ne m'y connais pas trop en programmation VBA, et, pour mon boulot, j'aurai besoin de vos lumières...
    D'avance merci (avec explications en commentaires, c'est super, car petit à petit j'intègre !) !!

    L’objet de la macro est :

    1- à l'ouverture du fichier, si les dates du tableau sont dépassées par la date du jour alors les cellules vert, rouge, jaune passent en blanc vide.
    2- de pouvoir entrer dans une "box" une date future. La date rentrée est comparée à toutes celles présentes en vert, rouge, jaune. Si les dates du tableau sont dépassées par celle qui vient d’être renseignée alors les cases passent en blanc vide.

    La cerise sur le gâteau serait enfin d’additionner le nombre de cases blanches par colonne.

    Merci à la communauté.

    Gérard SEB.xlsx

  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
    Citation Envoyé par Leghe Voir le message
    1- à l'ouverture du fichier, si les dates du tableau sont dépassées par la date du jour alors les cellules vert, rouge, jaune passent en blanc vide.
    Bonne nouvelle : ceci peut se faire sans VBA avec une simple mise en forme conditionnelle.
    A lire : http://silkyroad.developpez.com/Exce...onditionnelle/

    2- de pouvoir entrer dans une "box" une date future. La date rentrée est comparée à toutes celles présentes en vert, rouge, jaune. Si les dates du tableau sont dépassées par celle qui vient d’être renseignée alors les cases passent en blanc vide.
    Si la date seuil est saisie dans une cellule, on peut également le faire avec une mise en forme conditionnelle assez simple.

    La cerise sur le gâteau serait enfin d’additionner le nombre de cases blanches par colonne.
    Ceci peut se faire avec une fonction NB.SI() en utilisant comme zone de scrutation la colonne de date et comme critère un ">"&AUJOUDHUI().
    Pour le second cas, remplacer AUJOURDHUI() la référence à la cellule où se trouve la date seuil.

Discussions similaires

  1. [XL-2013] Modifier des cellules en fonction d'une autre
    Par kaglaborn dans le forum Macros et VBA Excel
    Réponses: 8
    Dernier message: 01/10/2015, 10h53
  2. [XL-2013] Copier des cellules en fonction d'une plage de cellules
    Par Flows dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 24/02/2014, 18h38
  3. Réponses: 4
    Dernier message: 31/08/2012, 11h13
  4. Colorer des cellules en fonction de la date qu'elles contiennent
    Par Rahanin dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 03/12/2011, 14h28
  5. Effacer des cellules en fonction de la date
    Par jarault dans le forum Macros et VBA Excel
    Réponses: 9
    Dernier message: 16/04/2008, 12h08

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