Vba Aide pour faire un calcul

Bonjour a tous,

voila ma situation;
dans mon classeur j ai une feuille avec mes hypotheses et une feuille de resultats.

Je souhaite que la premiere cellule de ma plage dans ma feuille de resultat soit egale a :
la premiere cellule * la 2eme cellule de ma plage dans ma feuille d'hypotheses.

De plus je souhaite que lorsque je modifie la valeur de mes hypothese le resultat se mette a jour automatiquement sans a avoir executer la macro une nouvelle fois.

Quelqu'un aurait il une idée?

Merci d'avance a tout le monde

Pourquoi utiliser VBA ?

Il suffit d'écrire dans ta cellule resultat :

Citation:

---

=HYPOTHESE!A1*HYPOTHESE!A2

---

Cet exemple suppose que les cellules d'hypothèse sont les A1 et A2 de la feuille "HYPOTHESE".
A toi d'adapter !;)

merci pour la reponse:ccool:.

Mais en fait j utilise vba pour ajouté des tableaux dans mes hypotheses. Chaque fois qu un tableau est créé, cela introduit une nouvelle feuille avec un tableau de resultats.

Je cherche donc a mettre en relation les deux tableaux.. Par example
1er cellule * 2eme cellule dans mon tableau qui se trouve dans mes hypothese = 1 er ecellule dans mon tableaux de resultats.

Saurais tu comment faire?

Merci

Dans ce cas, tu peux insérer la formule dynamiquement via vba, à la création du tableau.

par exemple :

Code:

---

resultat.cells(1,1).FormulaLocal = "=HYPOTHESE!A1*HYPOTHESE!A2"

---

merci encore de ta reponse j ai essayé et ca marche
un dernier petit problem:
quand j'essaye:

code:

Code:

---

1 2 3 4 5 6 7

oRow1 = MyRange1.Row oCol1 = MyRange1.Column   oRow2 = MyRange2.Row oCol2 = MyRange2.Column   Cells(oRow2, oCol2).Offset(9, 2).FormulaLocal = "=Assumptions! Cells(oRow1, oCol1).Offset(3, 8)"

---

cela ne marche plus :cry:

Aurais tu une derniere astuce pour me debloquer??

Merci beaucoup

Bonjour
Quand tu utilises formulalocal ca revient a taper directment dans la barre de formule excel, essaye de taper cells(1,2) ou offset tu verra qu'il n'aime pas ;)

Code:

---

Cells(oRow2, oCol2).Offset(9, 2).FormulaLocal = "=Assumptions!" & Cells(oRow1, oCol1).Offset(3, 8).address

---

La tu ecris dans la barre de titre "=Assumptions!" directement suivit de l'adresse de Cells(oRow1, oCol1).Offset(3, 8)