Problème de formule et de macro VBA pour excel [Résolu]

Signaler
Messages postés
4
Date d'inscription
jeudi 16 juillet 2009
Statut
Membre
Dernière intervention
30 août 2010
-
Messages postés
4
Date d'inscription
jeudi 16 juillet 2009
Statut
Membre
Dernière intervention
30 août 2010
-
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

5 réponses

Messages postés
303
Date d'inscription
mercredi 12 janvier 2005
Statut
Membre
Dernière intervention
3 octobre 2013
1
Après reflexion je crois que l'on peut supprimer sum
Messages postés
64
Date d'inscription
jeudi 3 mars 2005
Statut
Membre
Dernière intervention
2 septembre 2010
1
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"

?
Messages postés
64
Date d'inscription
jeudi 3 mars 2005
Statut
Membre
Dernière intervention
2 septembre 2010
1
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
Messages postés
303
Date d'inscription
mercredi 12 janvier 2005
Statut
Membre
Dernière intervention
3 octobre 2013
1
Bonjour

Range("E8").Select
ActiveCell.FormulaR1C1 = "=sum(r9c2+r15c2)/2"

bonne journée
Messages postés
4
Date d'inscription
jeudi 16 juillet 2009
Statut
Membre
Dernière intervention
30 août 2010
1
Merci à tous els deux. Ta solution c148270 fonctionne très bien avec le sum et sans ausse.