Date dedernière modif. sur une ligne

Résolu

gexelpa -
via55 Messages postés 14393 Date d'inscription Statut Membre Dernière intervention - 28 nov. 2013 à 00:01

Bonjour,

Y'a t-il moyen de faire apparaître sur la 1ère cellule d'une ligne, la date de la dernière modification faite sur n'importe qu'elle cellule de cette même ligne ?

Merci d'avance !

Afficher la suite

1 réponse

Réponse 1 / 1
via55 Messages postés 14393 Date d'inscription Statut Membre Dernière intervention 2 759
Bonsoir

Possible avec un code VBA

Par exemple pour modifications en ligne 5

Alt + F11 pour ouvrir l'éditeur de macro

Dans la fenêtre de gauche choisir la feuille concernée
dans la fenêtre de droite entrer le code suivant :
```
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 5 Then Exit Sub ' si changement autre que dans la ligne 5 rien ne se passe
Range("A5").Value = Date ' sinon date mise en A5

End Sub
```
Cdlmnt

"L'imagination est plus importante que le savoir." A. Einstein
0
1. gexelpa
  
  Bjr via55
  
  J'ai collé le code dans vba, mais cela ne fonctionne que pour la première ligne, alors que j'ai dupliqué le code pour une dizaine de ligne (en prenant soin, évidemment, de changer N° de ligne & N° de cellule...) ?
  
  De plus, comment puis je faire pour que ce code soit valable à l'ensemble des lignes de ma feuille ?
  
  Merci d'avance.
  
  0
2. via55 Messages postés 14393 Date d'inscription Statut Membre Dernière intervention 2 759
  
  Bonsoir gexelpa
  
  oui le code était un exemple pour une ligne
  
  pour une validité pour toute la feuille :
  
  Private Sub Worksheet_Change(ByVal Target As Range) c=target.row Range("A" & c).Value = Date End Sub
  
  Cdlmnt
  
  0

Date dedernière modif. sur une ligne

1 réponse

Discussions similaires

Newsletters