[[20180605185624]]　『ゴールシーク　マクロ　m(｡´≧Д≦｀｡)mm(｡´≧пx（アルパカぱかぱか）　ページの最後に飛ぶ

『ゴールシーク　マクロ　m(｡´≧Д≦｀｡)mm(｡´≧Д≦｀｡)m』（アルパカぱかぱか）

基本

    Range("J3").GoalSeek Goal:=0.05, ChangingCell:=Range("G3")

エクセルのマクロ記憶で、上記が完成しましたが、
E列に数値が入っているセルすべて最後まで、G列に計算した結果を入れたいです。

見よう見まねで作成してみたのですが、エラーはなく実行されますが、
謎の膨大な数値が計算されます。

Dim i As Long
For i = 3 To Range("E2").End(xlDown).Row

    Cells(i, "J").GoalSeek Goal:=0.1, ChangingCell:=Cells(i, "G")
    Next

End Sub

どこがおかしいかご指摘いただけますと幸いです。
よろしくお願い致します。

＜使用 Excel：Excel2016、使用 OS：Windows10 ＞

 どこのセルにどんな数式が入っていて、
 謎の数値はどこのセルにどんな値で出たんですか？

 あと、タイトルは、質問の要約を書くようにしてください。
 お気持ちの要約は本文にお書きください。

（半平太） 2018/06/05(火) 20:21

コメント返信：