Mois et Année sous VBA d'access

Résolu
Bonjour,
je n'arrive pas a extraire le mois et l'année de la date courrante je n'arrive qu'obtenir la date sous forme jj/mm/aaaa avec la commande Date()
Comment faire pour obtenir selemnt le mois ou lannée?
Merci
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  1. Je remonte le sujet car il m'intéresse, en effet polux à très bien expliqué comment obtenir le format YYYYMM mais il n'explique pas comment l'affiché ensuite...
    J'ai fait quelque essai mais cela c'est avéré infructueux je vous donne mon code si quelqu'un veut bien me donner un petit coup de main...

    myDate = DatePart("m", Date)
    myDate = DatePart("yyyy", Date)
    msgbox myDate

    Malheureusement je n'obtiens que l'année comme résultat.

    OU

    myMonth = DatePart("m", Date)
    myYear = DatePart("yyyy", Date)
    myDate = myYear + myMonth
    msgbox myDate

    ---> on est en juillet 2010 je devrai donc obtenir 201007, cependant j'obtiens 2010 seulement

    Merci
    0
    1. Excusez je me suis trompé

      "---> on est en juillet 2010 je devrai donc obtenir 201007, cependant j'obtiens 2017 "
      ;-)
      0
    2. Contributeur
      Bonjour,

      essaie avec myDate = myYear *100 + myMonth

      eric
      0
    3. Cela marche nickel merci beaucoup Eriiic !!
      0
  2. Bonjour,

    Il faut utiliser la fonction DatePart().

    Dim myDate As Variant 'déclaration de la variable

    myDate = DatePart("m", Date) 'extrait le mois de la date courante.
    myDate = DatePart("yyyy",Date) 'extrait l'année de la date courante.
    myDate = DatePart("d", Date) 'extrait le jour de la date courante.

    Bon courage

    ;o)

    Polux
    0