Date butoir...

[Lucas]

Re-bonsoir...

Je complète un fichier et comme mes connaissances en excel sont restreintes...j'ai utilisé une formule que j'avais pour une date butoir d'une année...

Ce que je veux pour ce fichier c'est lorsque la date excède A3...inscrire en rouge en B3 que la date est dépasée...(Fichier joint)..

Merci beaucoup!....Lucas

 

[Excel-lent]

Re : Date butoir...

Bonsoir Lucas, le fil,

J'ai fais le nécessaire pour B3 et B4. Tu peux copier/coller vers le bas, c'est prévu pour.

Qu'ai-je fais :
-> utilisation de la formule si() pour l'affichage de ton message : "date dépasée"
-> utilisation de la MFC (mise en forme conditionnel), pour le coloriage ou non de la cellule en rouge.

Bref, tu avais déjà trouvé ces solutions, je me suis juste borné à corriger et simplifier.

Bonne fin de soirée

 

[Lucas]

Re : Date butoir...Merci!...

Merci beaucoup Excel-lent!...pour moi...tu as fais plus que "borné à corriger et simplifier".


C'est fort apprécié...Joyeuses Fêtes!...Lucas

 

[Lucas]

Message à Excel-lent...

Bonjour Excel-lent...

J'ai utilisé ta formule dans le fichier joint et pour une raison que j'ignore en E3, je ne peux indiquer une date butoir....Encore Merci!...

 

[jeanpierre]

Re : Message à Excel-lent...

Bonsoir Lucas, Excel-lent,

C'est quoi ton fichier... ?

Pas trop la tête à réfléchir maintenant, mais on ne peut rien mettre en E3, entre autre...

Cela reste vide.... Je viens de tenter plein de truc et c'est toujours pareil....

Même après saisie d'une valeur, si l'on revient dans la barre de formule... elle est vide...

Le gag, là.... Mais bon, je n'avais pas tout regardé.....

Retire ton :

Private Sub Worksheet_Change(ByVal Target As Range)
If (Target.Column = 5 Or Target.Column = 8) And Target.Row > 2 And Target.Text <> vbNullString Then
Application.EnableEvents = False
Target = Numeroter(Target.Text)
Application.EnableEvents = True
End If
End Sub

dans le code de la feuille et tout rentre dans l'ordre...

Le gag, comme j'ai dit.

Bonne nuit maintenant.

Jean-Pierre

 

[jeanpierre]

Re : Message à Excel-lent...

Re,

Les événementielles c'est bien, mais il faut que cela soit bien géré....

Point trop n'en faut...

En tous cas, tu m'a bien fait rigoler, même si j'ai eu quelques doutes un instant....

Allez, bonne nuit, j'y vais en ce qui me concerne mais je crois que je vais rêver à des cellules récalcitrantes.

 

[Denis132]

Re : Date butoir...

Bonsoir,

Merci jeanpierre, tu me sauves un mal de tête, ça faisait 10 minutes que je cherchais et je ne voyais absolument rien.


Denis

 

[jeanpierre]

Re : Date butoir...

Bonsoir Denis,

Valleyfield, c'est au Canada.. ?

Tu vas me dire, cherche dans google. Je n'utilise pas google, me demande pas pourquoi....

Ceci dit, j'aurais pu me prendre la tête aussi sur la chose...

Comme je n'ai pas d'alerte macro... (niveau de sécurité bas par habitude avec les problèmes que cela pose quelquefois surtout sur un forum), je n'avais donc pas connaissance de cela...

Le bol, comme on dit, peut-être, mais par principe je regarde toujours en VBE..... les feuilles, ThisWorkBook et les modules s'il y en a....

Bonne soirée à toi et bonne nuit bientôt...

Jean-Pierre

 

[Denis132]

Re : Date butoir...

Rebonsoir Jean-Pierre,

Valleyfield c'est au Québec tout près de Montréal et présentement nous "subissons" une belle tempête de neige alors j'ai plus de temps pour XLD
mais sans ton intervention, j'aurais sûrement perdu beaucoup de temps sur ce fichier. Alors merci encore, je retiens la leçon.

@+

Denis

 

[kjin]

Re : Date butoir...

Bonsoir,
Reste quand même que si le code était présent, ce n'est pas un hasard, non ?!
Même si la fonction ne doit pas s'appliquer pas à cette colonne
A+
kjin

 

[Lucas]

Re : Date butoir...

Merci Jean-Pierre...

Comme le dit Klin...Je ne sais pas du tout d'où proviennent ces codes???...mais bon!...un gros gros Merci!....un mal de tête en moins!...Lucas

 

[Lucas]

Re : Date butoir...

Re-bonjour Jean-Pierre, Klin et Denis...

Voilà, j'ai enlevé les codes du fichier et ça fonctionne pour ajouter une date..

Toutefois, j'avais des codes qui me permettaient d'ajouter de la numérotation «automatique» dans la case résultat et décisions en appuyant sur ALT+retour...numérotation 1,2,3....

Est-il possible de récuper cette «commande»...Merci!....Lucas

 

[kjin]

Re : Date butoir...

Bonjour,
Je me disais bien aussi 🙄

Est-il possible de récuper cette «commande»...Merci!....Lucas

Le pb c'est que si tu souhaites conserver cette fonctionnalité pour la colonne E (Date butoir), tu risques d'avoir qq soucis pour comparer tes dates et valider ta MFC
Si la fonctionnalité ne concerne que les colonnes 4 et 7 comme dans ton fichiers, alors il faut le spécifier dans le code

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = [COLOR="Red"]4[/COLOR] Or Target.Column = [COLOR="Red"]7[/COLOR] And Target.Row > 2 And Target.Text <> vbNullString Then
        Application.EnableEvents = False
        Target = Numeroter(Target.Text)
        Application.EnableEvents = True
    End If
End Sub

A+
kjin

 

[Lucas]

Re : Date butoir...

Merci beaucoup Kjin..

Je vais essayé ta «commande»...penses-tu qu'il serait possible d'ajouter à la numérotation une sous numérotation. Par exemple :

1. Kjin
1.1 Lucas
1.2 exemple.....

Encore un fois un gros Merci!...Lucas