Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…