Exécuter une formule via Macro Excel

vinceca -  
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
    bonjours ,
    peut etre avec l'équivalent VBa de la fonction evaluer...
    ActiveCell.FormulaR1C1 = Evaluate("FIN.MOIS(MAINTENANT(),2)" )
    ?
    1. vinceca
      Pas mieux ...
      ni ActiveCell.FormulaR1C1 = Evaluate("=FIN.MOIS(MAINTENANT(),2)" )
      et autres variantes ..
    2. ponpon
      @vincecaBonjour,
      Essayez ce qui suit :
      Range("D10").Select
      ActiveCell.FormulaR1C1 = "=EOMONTH(NOW(),2)"
      Selection.NumberFormat = "m/d/yyyy"