rss
[Excel] date automatique sans mise à jour
par bob
 Fil de Discussions
Statut : Non résolu
jeudi 28 septembre 2006 à 12:41:49
Bonjour,

Je cherche à marquer la date du jour dans B1 dès que A1 est remplie. La formule =si(A1=""; ""; AUJOURDHUI() ) dans B1 fonctionne très bien, mais quand je réouvre le fichier le lendemain, la date se met à jour, et ce n'est pas ce que je souhaite.
Comment faire pour que cette info soit figée d'un jour sur l'autre.
Quand j'utilise Ctrl ; à la place de la formule, ça marche très bien et ça reste figé dans le temps, mais j'aimerais une solution plus "automatique" que Ctrl ; .

Merci
Cordialement
Bob
Répondre à bob  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Par JvDo, le jeudi 28 septembre 2006 à 13:17:06 Fil de Discussions
Bonjour,

une macro évènementielle te conviendrait-elle?
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then If Not (IsEmpty(Target.Value)) Then Range("B1").Value = Now Else Range("B1").ClearContents
End Sub
à mettre derrière ta feuille de calcul

cordialement
Répondre à JvDo

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Par bob, le jeudi 28 septembre 2006 à 14:11:08 Fil de Discussions
Merci,

ça répond à la moitié de ma question. :-D
En fait, je voudrais propager cette règle sur les colonnes A et B.
Je m'explique :
Si je saisie une valeur dans A1, alors B1 prend la date du jour.
Si je saisie une valeur dans A2, alors B2 prend la date du jour.
...
Si je saisie une valeur dans An, alors Bn prend la date du jour.

Comment modifier ta macro évenementielle en ce sens?

Cordialement
Bob
Répondre à bob

3


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Par JvDo, le jeudi 28 septembre 2006 à 15:12:52 Fil de Discussions
bonjour,

comme ça :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then If Not (IsEmpty(Target.Value)) Then Range("B" & Target.Row).Value = Now Else Range("B" & Target.Row).ClearContents
End Sub


A+
Répondre à JvDo

4


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Par TotoL, le mercredi 14 février 2007 à 15:32:39 Fil de Discussions
Bonjour,

Il est très bien ce script, mais je l’ai testé et il ne fonctionne toujours pas très bien parce qu’à chaque fois que je reviens sur la cellule, et bien elle se met à jour.

Je suis en train de réaliser un document de fiche d’incident.
Dans une première partie j’utilise la date pour générer un numéro, c’est-à-dire :
Ex : 14/02/2007 15 :00
Dans ma cellule je voudrais avoir ceci 20070214-1500.
Pour cela j’ai utilisé la formule classique sous Excel : =MAINTENANT()

Ce que je cherche à faire avec cette cellule et de créer un numéro unique lors de la première ouverture du fichier et qu’elle ne se mette plus a jour, quel soit statique. Surtout impossible de changer le numéro.

Dans la deuxième partie, j’ai ceci :
......| A | B | C | D
13 | N° | Date | Heure | Intervenant
14 | 1 | 14/02/2007 | 14H26 | Toto
15 | 2 | 14/02/2007 | 14H26 | Titi
16 | 3 | 14/02/2007 | 14H26 | Tutu

Ce que je voudrais faire est :
- Dès qu’un non est entré dans la colonne E (Intervenant)
- La date et l’heure se met à jour automatiquement mais une seul fois, sans possibilité de changer, sauf si le nom est supprimer.

Ce que j’ai fait : dans la colonne Date j’ai mis cette formule : =SI(ESTVIDE(D14);"";AUJOURDHUI())
dans la colonne Heure j’ai mis cette formule : =SI(ESTVIDE(D14);"";MAINTENANT())

Il faut savoir que ces deux formules ne sont pas du tout fonctionnelles. Les cellules se mettent à jour systématiquement dès que je rentre un nouvel utilisateur et en plus met à jours celles des autres utilisateurs. Et aussi par la même occasion le numéro d’incident qui est basé sur la date.

Je ne suis pas du tout une personne qui maitrise cet outil, mais j’essai de le faire pour simplifier mon quotidien.

Merci pour la personne qui pourra m’aider a trouvé une solution à mon problème.
Répondre à TotoL

6


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Par jamesr, le dimanche 24 février 2008 à 03:07:18 Fil de Discussions 
YES, je suis assez content de moi, depuis le temps que je cherchais à insérer une date sans qu'elle soit mise à jour.

C'est même d'une facilité déconcertante, mais comme souvent, il fallait y penser.

La Solution:

Vous enregistrez une macro qui insert l'heure ou la date du jour, "maintenant()" par exemple.

Puis vous copier la cellule (plus facile à faire en macro relative) et vous faite "collage spécial" coller la valeur.

C'est tout simple non????

James

Ps: faire coller les valeurs à Excel peut être utile dans de nombreux cas, par exemple lorsqu'on veut récupérer le résultat d'un calcule dans un programme externe.
Répondre à jamesr

5


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Par wesley, le mercredi 20 février 2008 à 14:55:56 Fil de Discussions
salut a tous
j'ai eu un probleme d'internet on ma dis de desinstaler les dernieres mises a jour c se que jai fais internet est revenu mais maintenan a chaque fois que je ferme mon pc acer vista des nouvelles mises a jour et cela bloc mon acce internet ma question est comment empeché cela ? merci a vous d avance......
Répondre à wesley
Discussions pertinentes trouvées dans le forum
19/03 10h03Excel: Date automatiqueLogiciels/Pilotes19/03 10h093
16/03 20h35excel - date en nombre de jourWindows20/03 20h202
27/05 16h06date automatique excel sans mise a jourLogiciels/Pilotes28/05 11h231
15/05 09h57Excel VBA - Bug avec mise à jour automatiqueProgrammation15/05 09h570
Plus de discussions sur « [Excel] date automatique sans mise à jour » Discussion en cours Discussion fermée Problème résolu
Logiciels pertinents trouvés dans les téléchargements
Télécharger Windows XP SP2 1.0Windows XP SP2 - Les Service Packs constituent un moyen pratique, tout en un, d'accéder aux derniers pilotes, outils et améliorations en...Catégorie: Librairies (DLL)
Licence: Freeware/gratuit
Télécharger MoonSecure 1.0.0.132MoonSecure - Moon Secure Antivirus se veut être le seul antivirus Open Source possédant un module de surveillance en temps réel, le...Catégorie: Antivirus
Licence: Freeware/gratuit
Télécharger NcFTP 3.2.1NcFTP - NcFTP est un formidable client FTP en ligne de commande disponible pour la quasi-totalité des systèmes d'exploitation....Catégorie: Téléchargement
Licence: Freeware/gratuit
Télécharger MYPE - Manage Your Photos Easily 1.0MYPE - Manage Your Photos Easily - MYPE (Manage Your Photos Easily) est un gestionnaire de photos libre et gratuit, simple d'utilisation. Parmi les...Catégorie: Album photo
Licence: Open Source
Plus de logiciels gratuits sur « [Excel] date automatique sans mise à jour »
Répondre
Titre du message :
Votre pseudo:
Votre email :
Message: 
  •  
  •  
Options: Recevoir les réponses par mail.
 

Aide