Erreur dans un code VBA

Résolu
jc80 Messages postés 5063 Date d'inscription   Statut Membre Dernière intervention   -  
jc80 Messages postés 5063 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Une erreur dans cette partie de code que je n'arrive pas a résoudre
Range(co2 & li).NumberFormat = "dd/mm/yyyy hh:mm"
Range(co2 & li).Value = Date
J'obtiens 23/09/2015 00:00 au lieu d'avoir la date et l'heure du moment
Merci pour votre aide
Cordialement

3 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Date
    donne la date, pas date et heure

    Range(co2 & li).Value = Now
    0
  2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    bonjour

    essaies avec
    With Range("B4") 'par eaxemple
    .Value = Now
    .NumberFormat = "dd/mm/yyyy hh:mm"

    End With

    mais fais un essai avec des dates et mois <12

    edit:excuse moi F89, je n'avais pas rafraichi

    Michel
    0
    1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Bonjour,

      Pas grave, mieux vaut deux reponses que pas du tout
      0
  3. jc80 Messages postés 5063 Date d'inscription   Statut Membre Dernière intervention   1 443
     
    Bonjour

    Merci a tous les 2

    En me creusant un peu le ciboulot j'ai réussi avec cela
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 3 Then
    Target.Offset(0, -2) = Format(Now, "dd/mm/yy hh:mm")
    End If
    End Sub
    Cordialement
    0