XL 2016 Fonction personnalisée

mapomme à dit:

Bonjour @Bebzinda 🙂,

Fonction n'existe pas en VBA. C'est Function 😉. VBA cause américain.

WorksheetFunction n'est ni adapté à votre exercice ni au stade d'apprentissage où vous êtes.

Comme hauteur et largeur sont de type Double (donc des nombres), on fait tout simplement le produit (code dans module1):

VB:

Function SurfaceRectangle(hauteur As Double, largeur As Double) As Double
   SurfaceRectangle = hauteur * largeur
End Function

Cliquez pour agrandir...

Bebzinda à dit:

Maintenant, la question du module ! Le module dans lequel j'ai écrit le code contient déjà un autre code pour la surface du cercle qui répond bien au test.

Cliquez pour agrandir...

soan à dit:

Bonjour Bebzinda, mapomme,

un module n'a rien à voir avec la quadrature du cercle : c'est tout à fait possible de mettre plusieurs subs et functions dans un même module ; mais pour éviter d'avoir des modules trop longs, tu peux ajouter d'autres modules standards : dans la fenêtre "Microsoft Visual Basic", fais Alt i m pour insérer un module ; après ton 1er module standard Module1, les suivants seront automatiquement nommés successivement Module2, Module3, Module4, etc... 🙂​

soan

Cliquez pour agrandir...

soan à dit:

Bonjour Bebzinda, mapomme,

un module n'a rien à voir avec la quadrature du cercle : c'est tout à fait possible de mettre plusieurs subs et functions dans un même module ; mais pour éviter d'avoir des modules trop longs, tu peux ajouter d'autres modules standards : dans la fenêtre "Microsoft Visual Basic", fais Alt i m pour insérer un module ; après ton 1er module standard Module1, les suivants seront automatiquement nommés successivement Module2, Module3, Module4, etc... 🙂​

soan

Cliquez pour agrandir...