Discussion :

[boulser]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[Menhir]

j'ai essayé le simple code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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

Tss tss 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/

[boulser]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[boulser]

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