bloquer formule aujourdhui() Résolu/Fermé

Question

Bonjour, 
j'ai cherché sur les discussions passées mais n'ai pas trouvé exactement mon problème. Dans un tableau j'ai des calculs de pourcentage (40 colonnes) et lorsque la cellule affiche 100%, la cellule de droite inscrit la date du jour du passage à 100%. Évidemment, je voudrai fixer cette date qui change tous les jours.Dois-je faire une macro car il y a 40 colonnes et 3500 lignes.
N'y aurait-il pas un petit code qui puisse prendre cela en charge?
D'avance merci.

ccm81 · Accepted Answer

Bonjour à tous les deux

C'est un changement dans AVC(1) dans les colonnes où on inscrit les %, qui doit provoquer l’écriture de la date en AVC(2)
Un début
https://www.cjoint.com/c/JAopoSCUZmB

Cdlmnt

JCB40 · Answer

Bonjour,
Un exemple de votre fichier avec explications serait le bienvenu.
Pour transmettre un fichier, 
Veillez à ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES 
il faut passer par un site de pièce jointe tel que cjoint.com 

Allez sur ce site : https://www.cjoint.com/ 
Clic sur parcourir, 
Cherche ton fichier, 
clic sur ouvrir, 
Clic sur "Créer le lien cjoint", 
Copier le lien, 
Revenir ici le coller dans une réponse... 
Cordialement

technicom1776 · Answer

Bonjour,
voici le lien du fichier :
https://www.cjoint.com/c/JAoh1kO7XY3

J'ai raccourci les colonnes et les lignes et remplis une partie des cellules.
l'onglet "Avc (1)" sert au renseignement des l'avancement des travaux, le calcul et le datage se font dans l'onglet "Avc (2)". Cest dans celui-ci que je voudrais figer la date dès que la cellule liée atteint 100%.
A moins de créer une macro reprenant chaque cellule, je ne vois pas.
Bonne journée.

JCB40 · Answer

Bonjour
Ton fichier en retour 
Faire Alt+F11 pour voir le code qui se trouve sur la feuil avc2
 https://www.cjoint.com/c/JAojmaw3tK6
Tu reviens si tu as un souci

technicom1776 · Answer

Bonjour,
merci pour ton aide, mais cela ne fige pas la date. si je change la date de mon pc (15/01), toutes les cellules passent au 15/01 (les nouvelles comme celles qui étaient déjà à 100%).
ce que je voudrai faire c'est que dès que ma cellule passe à 100%, la date de ce passage se mette et reste à cette date après.
cdt

JCB40 · Answer

Re 
Nouveau code avec mes excuses

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("A:AAZ")) Is Nothing Then
If Target.Value = 1 Then
Target.Offset(0, 1) = Date
End If
End If
End Sub

technicom1776 · Answer

toujours pas cela.
en cas de changement de jour, la formule "aujourdhui()" reprend la date d'aujourd'hui et non celui du jour du passage à 100%.

technicom1776 · Answer

j'ai effacé les formules et cela n'a toujours pas l'air de fonctionner. je ne sais pas ce que j'ai fait de travers. Voici mon fichier modifié.
https://www.cjoint.com/c/JAooaMv3iy3
si tu peux me dire.

technicom1776 · Answer

mais mais mais c'est merveilleux.
c'est exactement ce que je voulais. magnifique un grand merci.
je vais dupliquer sur les autres colonnes.

Bloquer formule aujourdhui()

9 réponses

Discussions similaires