Extraire le calcul d'une macro

Signaler
Messages postés
63
Date d'inscription
lundi 10 février 2020
Statut
Membre
Dernière intervention
17 juillet 2021
-
Messages postés
16448
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 juillet 2021
-
Bonjour,

Je dispose d'un fichier excel qui calcul automatiquement différents indices pratiques au cyclisme après avoir cliqué sur Ctrl + n. Les éléments à entrer sont en rouge (Puissance en watt, poids du cycliste + vélos, etc).



Une colonne (entourée en bleu) issue d'un calcul Macro me pose problème, car je n'arrive pas à déterminer comment elle est calculée. Voici le code VBA que j'ai pu extraire avec Alt + F12, dans "Module 2".

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le xx/xx/xxxx par xx
'
' Touche de raccourci du clavier: Ctrl+n
'
    Range("J11").Select
    ActiveCell.FormulaR1C1 = "500"
    Range("J12").Select
    ActiveCell.FormulaR1C1 = "500"
    Range("J13").Select
    ActiveCell.FormulaR1C1 = "500"

    Range("K11").GoalSeek Goal:=0, ChangingCell:=Range("J11")
    Range("K12").GoalSeek Goal:=0, ChangingCell:=Range("J12")
    Range("K13").GoalSeek Goal:=0, ChangingCell:=Range("J13")

End Sub


Je ne vois aucun calcul ni équation. Existe-il une autre manière de voir comment une colonne est calculée ? Je met à disposition le fichier dans mon drive :

https://drive.google.com/file/d/1o9ILlHsKk-ylxQ_5ObmFXJg-IZxXl5uu/view?usp=sharing

Un grand merci.


Configuration: Windows / Chrome 91.0.4472.164

2 réponses

Messages postés
16448
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 juillet 2021
880
bonjour,
c'est la méthode GoalSeek qui calcule ces valeurs.
par exemple, la ligne 15 de ton code modifie la valeur de J11, afin d'avoir une valeur proche de 0 en K11.
Messages postés
63
Date d'inscription
lundi 10 février 2020
Statut
Membre
Dernière intervention
17 juillet 2021

Hum, je pense comprendre merci.
Cependant, que pourrait signifier "avoir une valeur proche de 0 en K11". C'est une formule mathématique qui permet ce résultat ?
Messages postés
16448
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 juillet 2021
880
Si tu veux une formule mathématique, il faut alors la programmer toi-même.
Excel travaille par itération, pour tenter de découvrir une valeur adéquate.
Messages postés
63
Date d'inscription
lundi 10 février 2020
Statut
Membre
Dernière intervention
17 juillet 2021
>
Messages postés
16448
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 juillet 2021

Ok ! Dans ce cas, sur quelle cellule se base J11 pour avoir une valeur proche de 0 en K11 ?
Merci
Messages postés
16448
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
27 juillet 2021
880 >
Messages postés
63
Date d'inscription
lundi 10 février 2020
Statut
Membre
Dernière intervention
17 juillet 2021

Connais-tu le concept de formule dans Excel?