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

  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
    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
      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
    Bonjour, 

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

    A+
    1
    2. via55
      Bonjour,

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


      Cdlmnt
      Via

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

        Merci à tous pour votre aide.

        Cordialement,
        0