XL 2016 insérer date vba

MASSJIPE

XLDnaute Impliqué
Bonjour le forum
Je cherche un code qui me permet d'insérer la date du jour sur un simple clic à partir de la 3° ligne dans les colonnes A et O au format jj/mm/aaaa
Merci
 

vgendron

XLDnaute Barbatruc
Hello
avec ce code à mettre dans le code de la feuille

VB:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Row >= 3 And ((Target.Column = 1) Or (Target.Column = 15)) Then
    Target = Date
    Target.NumberFormat = "dd/mm/yyyy"
    Target.Offset(0, 1).Select
End If
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 196
Messages
2 086 101
Membres
103 116
dernier inscrit
kutobi87