date automatique

nico3869

XLDnaute Nouveau
Supporter XLD
Bonjour à tous

Je souhaite faire afficher la date du jour seulement quand je rentre des données dans une cellule bien prècise. Si la cellule n'est pas modifié, pas de changement de date

j'ai commencé avec :

Private Sub Workbook_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Range("A2") = Now
End Sub

Ca a fonctionné un jour puis plus rien.

Débutant dans le langage VBA, je ne comprend pas.

Vous remerciant d'avance pour votre aide
 

Pierrot93

XLDnaute Barbatruc
Re : date automatique

Bonjour,

perso connais pas cet événement...
"Private Sub Workbook_Change(ByVal Target As Range)"
sans doute veux tu utiliser celui d'une feuille de calcul, si c'est le cas essaye ainsi :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
'ton code
End Sub

A utiliser dans le module de la feuille concernée.

bonne journée
@+
 

Discussions similaires

Statistiques des forums

Discussions
312 723
Messages
2 091 357
Membres
104 891
dernier inscrit
siperr