Code pour calcul surface

Bonjour,
Je suis débutant dans le VBA.
J'ai un exercice dans le cours que j'étudie mais n'arrive pas à trouver la réponse.

J'ai un classeur nommé Test-Macro.xlsm composé de trois feuilles. La question est :
Ecrire une macro qui permet de calculer la surface d'un rectangle (hauteur*largeur) à partir des valeurs contenues dans les cellules A1 et B1 de la deuxième feuille de calcul. Le résultat sera écrit dans la cellule C1.

j'ai essayé le simple code :

Code:

---

1 2 3 4 5

Sub MacroCalculSurface()   Range("C1").FormulaR1C1 = "=A1*B1"   End Sub

---

Cela me renvoie en C1 une erreur #Nom?

Si vous pouvez m'aider ce serait très gentil de votre part.

Citation:

---

Envoyé par boulser

j'ai essayé le simple code :

Code:

---

Range("C1").FormulaR1C1 = "=A1*B1"

---

---

Tss tss :nono: Là tu triches.
Je penses que ton prof veut que tu fasses du vrai VBA, pas de l'Excel déguisé.

Réfléchis bien, ça peut se faire en une seule ligne (plus le Sub et Ens Sub).

N'oublie pas que lorsqu'on veut référencer des cellules de feuilles différentes, il faut référencer leur Worksheet.
https://msdn.microsoft.com/fr-fr/lib.../ff194464.aspx

Et si tu veux réviser les bases :
http://bidou.developpez.com/article/VBA/

Merci de ta réponse.

C'est un ancien cours sur le net et je n'ai pas la possibilité de contacter l'éditeur du tuto.

J'ai déjà essayé la ligne

Code:

---

Range("C1")=Workbooks("Test-Macro.xlsm").Worksheets("Feuil2").Range("A1").Value

---

Ce qui me renvoie la valeur de la cellule A1. Je n'arrive pas à créer la multiplication de la cellule A1 par B2.

OK Merci j'ai trouvé.
C'était évidemment simple mais il fallait y penser.