rss
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Non résolu

[Excel] comment indiquer une date de saisie ?

Posté par Ber, le jeudi 30 mars 2006 à 11:51:11
Bonjour à tous,

Je voulais savoir si quelqu'un connaissait une fonction d'excel ou une macro permettant d'afficher dans une cellule la date de saisie d'un nombre ou texte d'une autre cellule ?
Répondre à Ber  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Armojax, le jeudi 30 mars 2006 à 14:01:38
Bonjour Ber,

Tu peux activer dans Excel le suivi des modifications :
Outils/Suivi des modifications/Afficher les modifications...
Les cellules modifiées sont assorties d'un commentaire comportant l'auteur, la date, l'heure de la modification, avec valeur avant et valeur après.
Répondre à Armojax

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Ber, le jeudi 30 mars 2006 à 15:46:20
Merci pour cette réponse, mais le problème c'est que j'ai besoin d'insrire les dates dans des cellules pour pouvoir les retraiter derrrière.
A l'heure actuelle le seul moyen que j'ai trouvé c'est de créer une macro a executer à chaque mise à jour et qui inscrit la date dans la cellule à coté de celle modifiée mais je voudrais que ce soit instantaner et ne pas devoir appuyer sur une touche.
Répondre à Ber

3


  • 3
    Ce message vous semble utile, votez !
  • Ce message ne vous semble pas utile, votez !
  • Signaler ce message aux modérateurs
Sergio63, le jeudi 30 mars 2006 à 16:14:49
Bonjour,

Est-ce que ces quelques lignes de code répondent à ton problème ?

Private Sub Worksheet_Change(ByVal Target As Range)
' Affiche la date en colonne 2 lorsque la colonne 1 est modifiée

If Target.Column = 1 Then
Cells(Target.Row, 2).Value = Now
End If

End Sub

(A copier dans la feuille concernée et éventuellement adapter !)

Cordialement

Sergio
Répondre à Sergio63

4


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Ber, le vendredi 31 mars 2006 à 13:12:58
Merci
C'est nickel

J'ai juste galérer parce que au debut je l'avais copier dans le modele
Répondre à Ber

5


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
BIG_OUF, le mercredi 20 juin 2007 à 13:51:00
Bonjour,
Cet article est fort interessant, car je cherche un système proche de celui-là.
En effet, j'aimerai ajouter un commentaire dans une cellule dont la couleur de fond aurait changé (dans une plage B1 - A108).
Seulement, je n'arrive pas à adapter le code comme il le faudrait ... Sauriez-vous m'aider? :)

Merci d'avane
Répondre à BIG_OUF

6


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Sergio63, le lundi 25 juin 2007 à 11:33:34
Bonjour,

Peux-tu me dire qui est à l'origine du changement de couleur ?

Si c'est l'utilisateur, ce doit être possible. Par contre si c'est une macro ou bien la mise en forme conditionnelle je vois pas trop comment faire.

cordialement

Sergio
Répondre à Sergio63

7


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
BIG_OUF, le lundi 25 juin 2007 à 13:50:42
Non, c'est l'utilisateur qui modifie (copier/coller de cellule déjà colorées).
En gros, il s'agit d'un Excel avec les dates de congés de chacun, et ca permettrait de savoir de quand date la dernière modification (en cas de littiges de congés posés le même jour).
Merci d'avance :)
Répondre à BIG_OUF

9


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Sergio63, le mardi 26 juin 2007 à 13:58:34
Bonjour,

Voila 2 macros (à copier dans la feuille concernée) qui doivent en principe répondre à ton problème :

Dim V_ColorCell As Long ' Variable pour mémoriser le code couleur

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' Mémorisation de la couleur lors de la sélection de la celleule

V_ColorCell = ActiveCell.Interior.Color

End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
' Comparaison après modification

If Target.Interior.Color <> V_ColorCell Then
Target.AddComment "Cellule modifiée le " + CStr(Date)
End If

End Sub

Attention : Cela ne marche que dans le cas d'un copier/coller car l'événement "Worksheet_Change" n'est pas déclanché si on ne modifie que la couleur de fond de la cellule. Dans ce cas je ne sais pas faire.

Cordialement

Sergio
Répondre à Sergio63

8


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Vivi, le lundi 25 juin 2007 à 15:44:01
bonjour,

J'ai besoin d'utiliser cette macro moi aussi.
Par contre le souci est que dans ma feuille excel, j'ai besoin par la suite de supprimer des lignes.
Par conséquent, j'attends demain que la date du jour ait changé mais ... je suppose que du coup en suppriment un ligne, les lignes du dessous vont se mettre automatiquement à la date du jour ... donc je perds les infos ...

Quelqu'un a t-il une piste à me proposer ? ?

Merci d'avance
Répondre à Vivi

10


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Sergio63, le mardi 26 juin 2007 à 15:09:56
Bonjour,

Je viens en effet de constater que lorsque on supprime une ligne, Excel considère que la cellule modifiée appartient à la colonne 1 et cela quelle que soit la position du curseur !

Avec l'exemple que j'ai proposé lorsque on supprime une ligne, la date de la ligne qui suit est donc modifiée à tort (uniquement la ligne qui suit et pas toutes les lignes en dessous).

Par contre si j'inverse les colonnes : saisie en col 2 et affichage date en col 1, plus de problème.

Je sais, ce n'est pas une vraiment une solution mais plutôt un contournement du problème mais je ne vois pas comment faire autrement.

Cordialement

Sergio
Répondre à Sergio63

11


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
Vivi, le mardi 26 juin 2007 à 19:13:58
Merci pour ces réponses
En fait j'ai fait le constat sur mon fichier d'essai et en effet ca change juste la premiere ligne...
Par contre sur mon fichier de travail, ca ne le fait pas ! mais les colonnes concernées sur les colonnes 5 et 6 ... par exemple
Donc je suis entièrement satisfaite ;-)
meme si je ne sais pas pourquoi ce mystère ... lol

Merci encore
Répondre à Vivi

12


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 TheClerk, le mercredi 14 novembre 2007 à 21:36:20
Bonjour,

Si je veux utiliser cette méthode:

****
Private Sub Worksheet_Change(ByVal Target As Range)
' Affiche la date en colonne 2 lorsque la colonne 1 est modifiée

If Target.Column = 1 Then
Cells(Target.Row, 2).Value = Now
End If

End Sub
*****

J'inscris quoi dans un Excel en français???

Merci
Répondre à TheClerk
Logiciels pertinents trouvés dans les téléchargements
Télécharger Excel Viewer 2003Excel Viewer - Avec Microsoft Office Excel Viewer 2003, vous pouvez ouvrir, afficher et imprimer des classeurs Excel (fichiers XLS ), même...Catégorie: Tableur
Licence: Freeware/gratuit
Télécharger Index.dat Analyzer v 2.0Index.dat Analyzer - Index.dat Analyzer permet de voir, éditer et effacer le contenu de ces fichiers - théoriquement cachés - qui participent aux...Catégorie: Anonymat/Confidentialité
Licence: Freeware/gratuit
Télécharger Super 2007.build.22Super - SUPER © est un convertisseur audio/vidéo universel, supportant une grande variété de formats d'entrée, dont : formats...Catégorie: Vidéo
Licence: Freeware/gratuit
Télécharger Google Toolbar pour Internet Explorer 4Google Toolbar pour Internet Explorer - La barre d'outils Google permet : d'afficher le pagerank des pages visitées d'ajouter à vos favoris les pages que vous...Catégorie: Référencement
Licence: Freeware/gratuit
Plus de logiciels gratuits sur « [Excel] comment indiquer une date de saisie ? »