Excel ゴールシークについて

質問

Ｅｘｃｅｌのゴールシーク機能について聞きたいことがあります。
普通に使いこなせてはいるのですが、ゴールシークで求める値が膨大な量で１回１回ゴールシークを開いて値を入力してとやっていては、らちがあかないのです。
セルでは黒十字を表示させてドラッグして一度に計算ができますが、ゴールシークでも同じようにたくさんの量を一度に計算することはできるのでしょうか。
教えてください。よろしくお願いします。

回答No.1

Wendy02

こんばんは。

ゴールシークというのは、概ね、単発で使うものですから、必要に応じて、VBAで代用が利きます、

Sub Main()
　'ここで、ループを使う
　FindTest Range("B1"), Range("A1"), 20

End Sub
Sub FindTest(rng1 As Range, rng2 As Range, aim As Double)
'数式のセル, 変化させるセル, 目標値
Dim i As Long
i = 1 '変化値の初期値
Do
　 rng2.Value = i
　 i = i + 1
Loop While aim >= rng1.Value
End Sub