BONSOIR !
Sujet: Ecrire une macro qui permet de calculer la surface d'un rectangle à partir des valeurs contenues dans les cellules E2 et F2 de la deuxième feuille de calcul. le résultat sera écrit dans la cellule G2.
En saisissant le code je tombe sur une difficulté: " Erreur d'exécution 9".
Pourriez vous m'aider?
Sub ChoixClasseur()
Dim Longueuer As Double, largeur As Double, AireRectangle As Double, Classeur6 As String, Feuil2 As String
Longueur = Workbooks("Classeur6").Worksheets("Feuil2").Range("E2")
largeur = Workbooks("Classeur6").Worksheets("Feuil2").Range("F2")
AireRectangle = ValeurLigne * ValeurLigne2
ActiveCell.FormulaR1C1 = AireRectangle
End Sub