Date (d'aujourd'hui) en commentaire

Bonjour,

COmment afficher en commentaire après double clic, la date du jour?

Merci par avance

Bonsoir Forum

Désolé mais je ne vois pas bien ce que tu cherches à faire.

Un fichier ? ou un exemple

Adrien

Bonsoir

Code à placer dans la feuille concernée :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

With Target.AddComment
    .Visible = False
    .Text "Le " & Date

End With
Target.Offset(1, 0).Select

End Sub

Amicalement

Nad

Bonsoir et merci Nad

Je n'aurais pas trouvé mais j'ai testé, génial.

Merci PyranaS9 d'avoir posé cette question

Adrien

Salut le forum

Pour éviter de réveiller le débogueur si le commentaire existe déjà

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

With Target
    .ClearComments
    .AddComment
    .Comment.Visible = False
    .Comment.Text "Le " & Date
    .Offset(1, 0).Select
End With

End Sub

Mytå

oK, merci à vous tous.