Exécuter une formule via Macro Excel

vinceca -  
 ponpon -
Bonjour,

Dans une macro Excel 2003 SP2 je mets simplement :

Range("A1").Select
ActiveCell.FormulaR1C1 = "=FIN.MOIS(MAINTENANT(),2)"

Quelque soit le format de la cellule A1, lorsque j'exécute ma macro elle me donne : #NOM

Je vais dans la barre de formule, je revalide ma formule et magie j'obtiens : 31/12/2009 (si le format est Date)

Y'a-t-il un moyen de "valider", d'"exécuter" cette formule ?

J'ai déjà essayer par référence B1 =test et test fait référence à EVALUER(A1) mais rien n'y fait ..

1 réponse

  1. pou pouille Messages postés 212 Statut Membre 31
     
    bonjours ,
    peut etre avec l'équivalent VBa de la fonction evaluer...
    ActiveCell.FormulaR1C1 = Evaluate("FIN.MOIS(MAINTENANT(),2)" )
    ?
    0
    1. vinceca
       
      Pas mieux ...
      ni ActiveCell.FormulaR1C1 = Evaluate("=FIN.MOIS(MAINTENANT(),2)" )
      et autres variantes ..
      0
      1. ponpon > vinceca
         
        Bonjour,
        Essayez ce qui suit :
        Range("D10").Select
        ActiveCell.FormulaR1C1 = "=EOMONTH(NOW(),2)"
        Selection.NumberFormat = "m/d/yyyy"
        0