Afficher la date du jour VBA

Résolu

dédé65000 Messages postés 11 Date d'inscription Statut Membre Dernière intervention -
dédé65000 Messages postés 11 Date d'inscription Statut Membre Dernière intervention - 6 sept. 2014 à 16:12

Bonjour,

J'aurais besoin d'un petit coup de main en VBA je m'explique,
J'ai un fichier permettant de suivre l'avancement des affaires le statut est soit en chiffrage soit en négociation soit en commande. le statut se sélectionne avec une liste déroulante.
Je souhaiterais qu'à chaque fois que statut passe en commande la date du jour s'affiche dans la cellule d'à côté de ce statut
Je ne sais vraiment pas comment faire, j'ai essayé avec des formules excel mais je ne pense pas que ce soit possible car il faut coller la date du jour en valeur (afin que celle ci ne change pas le lendemain
Quelqu'un peut-il m'aider ?

Merci d'avance

Cordialement
Je joins une image pour excel

A voir également:

Vba date du jour
Vba excel date du jour - Meilleures réponses
Date du jour en vba - Meilleures réponses
Mise a jour chrome - Accueil - Applications & Logiciels
Mise a jour windows 10 - Accueil - Mise à jour
Trouver une date de naissance gratuit - Forum Webmastering
Mettre a jour chromecast - Accueil - Guide TV et vidéo
Publipostage date inversée ✓ - Forum Word

4 réponses

Réponse 1 / 4

Normad Messages postés 112 Date d'inscription Statut Membre Dernière intervention 40

Bonjour,
Dans le code de la feuille (pas dans un module) utilisez la procédure évenementielle Worksheet_Change

Par exemple :

Private Sub Worksheet_Change(ByVal Target As Range)
    Range("A1").Value = Date
End Sub

On peut utiliser en plus de vos conditions sur le Statut l'emplacement à surveiller pour indiquer la date ou l'emplacement où la mettre avec la cellule qui a été modifiée. (Target.Row, target.Column ou Target.Adress)

Réponse 2 / 4

dédé65000 Messages postés 11 Date d'inscription Statut Membre Dernière intervention 1

Merci beaucoup pour votre réponse, je ne connaissais pas la procédure évènementielle qui correspond tout à fait à mes attentes

J'ai cependant quelques questions afin de mieu comprendre comment cela marche

1/ comment excel comprend-il que c'est lorsque j'affiche commande qu'il doit afficher la date en pas quand je choisis une autre valeur comme négo ?

2/ la date qui s'affiche en A1 va évoluer chaque jour étant donnée qu'il s'agit d'une formule aujourdhui(), cela ne va-t-il pas faire évoluer les dates remplis par la macro également au fil des jours ?

3/En l'état actuel, la procédure ne fonctionne que sur les cases D4 et D5 la encore je ne comprend pas comment c'est possible sans définition d'une plage

Pourriez vous m'éclairer ?

Réponse 3 / 4

Normad Messages postés 112 Date d'inscription Statut Membre Dernière intervention 40

Bonjour,

1) Excel ou plutôt le code VBA va faire ce qu'on lui demande dès qu'un changement à lieu dans la feuille grace à la macro évenementielle Worksheet_Change

2) Non, il ne s'agit pas d'une formule, mais bien de la date uniquement, celle-si ne se modifierait qu'avec un nouveau déclenchement de la macro

3) Sans avoir plus de détail ou mieux votre fichier, difficile de comprendre là où vous bloquer.

Si j'ai bien compris avec votre petite image, on a le statut dans la colonne en C. Lorsque celui-ci change et devient "Commande" on indique la date dans la colonne D (sur la même ligne).

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <> 3 Then Exit Sub
    If Target.Value = "Commande" Then Range("D" & Target.Row).Value = Date
End Sub

Travaillez votre macro avec mes commentaires précédant en incluant vos conditions et redites si vous bloquez et où.

Discussions similaires

VBA remplir une textboxt avec date du jour

Récupérer la date du jour sous VBA

Excel VBA, récupération de la date du jour

VBA cellule active date du jour

renommer un fichier txt avec la date du jour avec condition

Fonction SI avec date du jour

Votre réponse

Discussions similaires