Extraire le calcul d'une macro
preliator13600
Messages postés
76
Statut
Membre
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention -
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".
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.
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
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 588
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. -
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 ?
