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

Résolu
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

  • Votes
  • Date
  • Date décroissante
  1. Excel-worker
    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. 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
    2. Excel-worker
      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
  2. Gyrus
    Bonjour, 

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

    A+
    2. via55
      Bonjour,

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


      Cdlmnt
      Via

      2. bla
        C'est bon ça marche avec la méthode de Via55 et celle de Gyrus.

        Merci à tous pour votre aide.

        Cordialement,