Problème de formule et de macro VBA pour excelRésolu

Question

Bonjour à tous,
Je réalise des programmes en VBA pour Excel actuellement et je rencontre un problème.
La macro écrite en VBA est sensée mettre des formules dans deux cases avec la commande ci-dessous:
   
    Range("E8").Select
    ActiveCell.FormulaR1C1 = "=(B9+B15)/2"
    Range("E9").Select
    ActiveCell.FormulaR1C1 = "=(B10+B16)/2"

Cependant au lieu d'écrire dans mes cases excel la formule comme il le fait partout ailleur dans mon programmme, il écrit cela:
=('B9'+'B15')/2
Les Quotes (') transforme donc mes formules en texte et cela entraine un plantage de ma macro.
Quelqu'un aurait-il une solution à ce problème s'il vous plaît?
Merci d'avance

c148270 · Accepted Answer

Après reflexion je crois que l'on peut supprimer sum

Chouchensb · Answer

Je ne sais pas ce qu'est la notation R1C1, mais n'est ce pas plus simple de faire:
    
    Range("E8").Select
    ActiveCell.Formula = "=(B9+B15)/2"
    Range("E9").Select
    ActiveCell.Formula = "=(B10+B16)/2" 

?

Chouchensb · Answer

A, à priori, le R1C1, c'est pour désigner un ensemble de cellule par rapport à une autre cellule, de façon relative:
http://www.info-stat.com/XLVBAAutoSumMacro.htm

c148270 · Answer

Bonjour

     Range("E8").Select
    ActiveCell.FormulaR1C1 = "=sum(r9c2+r15c2)/2"

bonne journée

bourique22 · Answer

Merci à tous els deux. Ta solution c148270 fonctionne très bien avec le sum et sans ausse.

Problème de formule et de macro VBA pour excel

5 réponses

Votre réponse