Mois et Année sous VBA d'access

Résolu
banoka -  
 visto94 -
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. Polux31 Messages postés 7219 Statut Membre 1 204
     
    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
  2. visto94
     
    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. visto94
       
      Excusez je me suis trompé

      "---> on est en juillet 2010 je devrai donc obtenir 201007, cependant j'obtiens 2017 "
      ;-)
      0
    2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Bonjour,

      essaie avec myDate = myYear *100 + myMonth

      eric
      0
    3. visto94
       
      Cela marche nickel merci beaucoup Eriiic !!
      0