Aide sur une macro d'itération
Bonjour,
J'ai une cellule dont la valeur doit etre variée (E9) jusqu'à ce que une cellule devient nulle (M9) (les deux cellules sont liées implicitement par des équations). ce procédé doit etre réalisé pour les lignes allant de 9 jusqu'à 42.
J'ai essayé d'enregistrer une macro dans laquelle j'ai modifié son code VBA pour qu'il devient comme ceci :
Sub Macro2()
'
' Macro2 Macro
'
Dim i As Integer
For i = 9 To 42
Cells(i, 13).GoalSeek Goal:=0, ChangingCell:=Cells(i, 5)
Next i
'
End Sub
le problème c'est que ça marche pas, et l'erreur est repéré au niveau de la ligne Cells(i, 13).GoalSeek Goal:=0......
Si vous pouvez m'aider ou me proposer des éléments de réponses, je vous serai reconnaissant.
Bonjour,
Le problème ne provient pas directement de la macro... Peut-être de la formule.
A+
frangy a écrit :Bonjour,
Le problème ne provient pas directement de la macro... Peut-être de la formule.
A+
Merci "frangy " pour l'interet porté à mon message.
Voici le fichier sur lequel je travaile, les deux rangés de colonnes jaunes sont celles sujet de la macro (les colonnes vides sont celles qui devraient etre variées pour que les colonnées de la rangée "équation devient" nulles. Veuillez voir ça peut fonctionner.
J'ai affecté la valeur 77,15 à toutes les cellules de la colonne E (Cote) puis j'ai lancé la macro.
Voila le résultat
A+
merci infiniment pour l'aide, ça marche superbien.