Récupérer mois et année d'une cellule date

Résolu
bla -  
 bla -
Bonjour,

J'ai un code vba qui va s'appliquer à partir d'une cellule de mon fichier excel.
Dans cette cellule, l'utilisateur va entrer une date sous la forme "jj/mm/aaaa" et j'aimerai récupérer le mois de cette cellule dans une variable M et l'année dans une variable A afin de faire tourner mon programme en fonction de M et A.

Si quelqu'un sait comment faire je le remercie par avance

5 réponses

  1. Excel-worker Messages postés 603 Statut Membre 58
     
    Salut,

    En VBA, je ne sais pas mais sinon en formule, cela donne :

    =TEXTE(A1;"mmmm") pour récupérer le mois
    =TEXTE(A1;"aaaa") pour l'année

    Cdlt
    1
    1. bla
       
      Oui je sais, d'ailleurs pour le moment je récupère le mois dans une cellule et l'année dans une autre par une formule et j'attribue ces cellules à mes variables M et A.
      Ca marche mais j'aurai aimé le faire directement, sans passer par deux cellules intermédiaires.
      En tout cas merci pour ton aide
      0
    2. Excel-worker Messages postés 603 Statut Membre 58
       
      Ca marche mais j'aurai aimé le faire directement, sans passer par deux cellules intermédiaires.

      Euh ... tu as essayé :

      =TEXTE(A1;"mmmm")&" "&TEXTE(A1;"aaaa") car là tu concatène et tu passe pas par deux cellules.

      Cdlt
      0
  2. Gyrus Messages postés 3360 Statut Membre 526
     
    Bonjour,

    Dim M As Integer, A As Integer
    M = Month(Range("A1").Value)
    A = Year(Range("A1").Value)

    A+
    1
  3. via55 Messages postés 14393 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonjour,

    Avec la date en A1 :
    m = Month(CDate(Range("A1")))
    a = Year(CDate(Range("A1")))


    Cdlmnt
    Via

    0
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. bla
     
    C'est bon ça marche avec la méthode de Via55 et celle de Gyrus.

    Merci à tous pour votre aide.

    Cordialement,
    0