Suppression de l'écriture d'une fonction dans la cellule

bonjour,

n'étant pas un "pro" en vba, j'ai saisi ce code en auto, mon probléme est que la macro fonctionne bien mais elle m'écrit aussi la fonction excel dans la cellule.

Quelqu'un pourrait il m'expliquer pourquoi et comment résoudre mon probléme.

merci d'avance pour votre aide

philippe

sub Macro13()
'
'
    Range("H19").Select
    ActiveCell.FormulaR1C1 = "=ROUNDUP((R44C3/(ROUNDDOWN((R19C4/R39C4),0)*2)),0)"
    Range("H20").Select
End Sub

Bonjour,

Si tu souhaites obtenir simplement le résultat donné par la formule, tu peux coder

Sub Macro13()
    Range("H19") = Evaluate("ROUNDUP(($C$44/(ROUNDDOWN(($D$19/$D$39),0)*2)),0)")
End Sub

A+

bonjour Frangy

ok pour moi et merci

philippe