ベストアンサー 【エクセル】ゴールシークをマクロで使う方法は？ 2007/01/06 14:00 よろしくお願いいたします。 ゴールシークを組み込んだマクロを作成したいのですが どのように行ったら良いでしょうか？ ご存知の方、お教え願います。 みんなの回答 （1） 専門家の回答 質問者が選んだベストアンサー ベストアンサー venzou ベストアンサー率71% (311/435) 2007/01/06 14:15 回答No.1 数式入力セル A1 目標値 123 変化させるセル B1 とすると Range("A1").GoalSeek Goal:=123, ChangingCell:=Range("B1") 「マクロの記録」で記録させれば、簡単に調べられますよ。 質問者 お礼 2007/01/14 10:29 Venzouさん、有難うございました。 早速試してみます。 広告を見て全文表示する ログインすると、全ての回答が全文表示されます。 通報する ありがとう 0 カテゴリ パソコン・スマートフォンソフトウェアオフィス系ソフト 関連するQ&A エクセルのマクロ、「ゴールシーク」繰返し文。 エクセルのマクロで、 セル値［Ａ１］が、範囲内（１０から－１０）に成るまで、 「ゴールシーク」を、１０回だけ繰返す、 マクロ文を教えて下さい。 （変数セル［Ｂ１］） エクセルのマクロでゴールシークの繰り返し こんにちは。マクロ初心者です。 現在、エクセルのゴールシーク機能を繰り返し使うためにマクロを作っています。 下のプログラムでアクティブセルのゴールシークは行えるようになったのですが、これをアクティブセルが空白になるまで繰り返すことはできますか？ できればiを使わないようにしたいのですが‥ ActiveCell.goalseek Goal:=ActiveCell.Offset(0, -1).Value, ChangingCell:=ActiveCell.Offset(0, -3).Range( _ "A1") ちなみに違う人が使っていた Do Until ActiveCell.Previous.Value = "" を使おうと思ったらパソコンが動かなくなってしまいました‥ 基本ができていない為にめちゃくちゃなことをしているのかもしれませんが、どうかアドバイスをお願い致します。 Excel ゴールシークについて Ｅｘｃｅｌのゴールシーク機能について聞きたいことがあります。 普通に使いこなせてはいるのですが、ゴールシークで求める値が膨大な量で１回１回ゴールシークを開いて値を入力してとやっていては、らちがあかないのです。 セルでは黒十字を表示させてドラッグして一度に計算ができますが、ゴールシークでも同じようにたくさんの量を一度に計算することはできるのでしょうか。 教えてください。よろしくお願いします。 携帯料金を賢く見直す！格安SIMと端末選びのポイントは？ OKWAVE コラム エクセルのゴールシークを自動で連続して求めたい ゴールシーク機能はとても便利ですが、 これを行うには、一回一回、ツールバーからこれを選択するか、 マクロを記録するなどして、実行ボタンを作成しなくては いけません。 これを自作関数化するなどして、エクセルを開いている間、 自動的に、連続して算出する ようなことは可能でしょうか。 いろいろと調べては見たのですが、どうしても 分かりませんでした。。 ご存知の方がいらっしゃいましたら、 是非ご教授ください。 エクセルのメニューバーからゴールシークが消えてしまった。 はじまして。 オフィス2000,エクセル2000を使用しています。 エクセルでアイコンの新規作成をしようとしました。（ゴールシークというものですが） ユーザー設定を使いメニューバーから直接ドラッグアンドドロップしたらうまくいかず、おまけにメニューバーからもゴールシークの項目が消えてしまいました。どこを探してもゴールシークが見つかりません。 再びゴールシークを使うようにするにはどうしたらよいのでしょうか。 EXCEL ゴールシークの関数？ EXCEL ゴールシークの関数？ ゴールシークを画面操作をしなくて ゴールシーク機能を持つ 関数はありませんか？ 無ければ 複合関数は？ VBを使わないでEXCEL関数だけで 求める方法を探しています。 ゴールシークについて P=[RT/(v-b)]-a/v^2 という式のvをゴールシークを用いて求めよといわれました。 P,R,T.a.b,の値はそれぞれセル上にあります。 ゴールシークというものを使ったことがないので、この先どうすればｖを求められるか教えてください。 ゴールシーク（マクロ）で型が一致しないと表示 マクロ初心者です。 ゴールシークを調べると Range(”式の入ったセル”).GoalSeek Goal:=Range(”目標の入ったセル”), ChangingCell:=Range(”変化させるセル”) このような解説があったので、実際に Sub 熱伝導グラフ_ボタン17_Click() Worksheets(Sheet1).Range(S33).GoalSeek Goal:=Worksheets(Sheet1).Range(S32), ChangingCell:=Worksheets(Sheet1).Range(S25) End Sub 上を作成しマクロを実行したのですが、型が一致しませんというエラーが出ます。 何が原因なのか、またどのような対処が必要か教えてください。 作成したいゴールシークはS33の式中のＳ25を変化させることにより目標値Ｓ32になるＳ25を見つけるプログラムを作成したいと考えています。 よろしくお願いします。 ゴールシークとソルバーについて。 今度の9月に情報処理検定1級を受けます。 まだ3ヶ月もあるのですが、ゴールシークとソルバーの使い道がよく分かりません。 どういう時に、ゴールシークとソルバーを使い分ければ良いのでしょうか？ ゴールシークで解けますか？ 陰関数方程式、 F(X, Y)=0、 で表される式の解をゴールシークで求めることをしています。Yの確定値とXの初期値を入れてF(X, Y)=0を満たすＸを求めているわけです。とても重宝しています。 今回は、 F(X, Y)=0 と G(Y, Z)=0 の二つの陰関数からなっていて、Zの確定値からＸ（初期値を与えて）を求めたいのです。この場合、ＹはＦとＧをとりもつ変数となっています。 これはゴールシークでできるのでしょうか？ できない場合、どのようなソフトで可能かお教えください。 ソルバーとゴールシーク ソルバーとゴールシークってどこにありますか？office2007を使っています。 2003ではツール→ソルバーでいけたのですが・・・・ よろしくお願いします。 エクセルのゴールシークについて エクセルのゴールシークについて質問します。 実際に解が存在するにもかかわらず、計算式・目標値の条件によっては、解が求まらない場合があります。 私の場合、以下の計算を実行しましたが、解が求まりませんでした。 =SIN(ATAN(1/1500))-0.02^2*2000^2/(2*α+100)^(4/3)/(100*α)^2 変数＞α 目標値＞0.0 他の目標値では解が求まりました。 解決方法が分かれば教えてください。 よろしくお願いします。 ヤバいパソコンが壊れたかも！？事前に知っておきたい3つの兆候と対策 OKWAVE コラム ゴールシークのＶＢＡの質問 お世話になります。ゴールシークのＶＢＡの質問です。 ゴールシークの数式入力セルが”Ｆ２５”・目標値が”１５０”・変化させるセルを”Ｆ１８”とするゴールシークのルールとします。 コマンドボタンをクリックすると、上記で述べたゴールシークを自動で実行してくれ、その後Ｆ２４の値が４０以下なら「４０％以下です。水を補給し液面を増やしてください。」とMsg Boxが出現し、ＯＫボタンのみを表示させるＶＢＡはどの様に組めば良いのでしょうか？ Excelのゴールシークの問題 ゴールシークを使った次の問題の解き方を 教えてください。 【問題】 身長 １６９．５ｃｍ 体重 ７６．５ｋｇ BMI ２６．６の人がいる。 BMIが２２になる理想体重をもとめよ。 ExcelのPMTとゴールシーク Excelで分からない問題があります。 C8に借入額 ￥10,000,000 C9に期間 120 C10は利率ですが 空欄 C11に支払額 ￥83,333 が入力されています。C11には定期支払額を求める数式が入力されています。 そして、C11が「90000」になるようにゴールシークを使ってC10の値を求めよ。 というのが問題です。 先ず、C11にはPMT関数が使われていると思うのですが、どうしてマイナス表示ではないのか？ そして、期間が120なので「月」と判断すると、利率も年利ではなく月にしなければならないのか？ （単純に120で計算すると、－83,333になります。） 等を考えると、ゴールシークに行く前の段階でワケが分からなくなってしまいました。 どなたか分かり易く教えて頂けませんか。 よろしくお願いします。 ゴールシークについて エクセルのゴールシークを利用して解きたい問題があるのですが、 「セルに入力した数式の計算結果は数値でなければなりません」と表示されてしまいます。 「変化させるセル」が「数値入力セル」の分母であることが原因だと思われますが、 解決法がわかりません。 ご教示のほどよろしくお願いします。 Excel2003 ゴールシークの操作手順を教えてください たとえば、セルC9の限度額が300,000円の場合、セルC5の税抜き26,000円の商品は何個買うことができるか、ゴールシーク機能を使用してセルC7に求める。というもので、ゴールシークダイアログボックスに入力（セルをクリック）するのですが、うまくいきません。OKを押すと「数式の入力されているセルを指定してください」と表示が出ます。 （操作のどこか、間違っているとは思うのですが・・・） この場合、ゴールシークダイアログボックスの「数式入力セル」、「目標値」、「変化させるセル」には、どのセルを指定すればよいのか教えてください。 よろしくお願いします。 マクロゴールについて マクロゴール4000を5gを使用するのを、400で代替すると何g使えばいいのでしょうか？ 量は同じでいいのでしょうか？ ゴールシークの問題について質問させていただきます 問題集の答えがせずに困惑しております。ゴールシークを使って求めるようなのですが、どこをどうしていいのかわかりません。ゴールシーク自体の仕組みは大体理解しております。 誰か答えではなく具体的にどうしたらいいのかを教えてくださればとても助かります。よろしくお願いいたします。 Ａ学部：志願者2604人：合格者150人：倍率17.36 Ｂ学部：志願者5129人：合格者800人：倍率6.41 Ｃ学部：志願者5355人：合格者960人：倍率5.58 Ｄ学部：志願者8876人：合格者2240人：倍率3.96 Ｅ学部：志願者5815人：合格者1600人：倍率3.63 このときＡ学部の倍率（合格者）を変えずに、他の合格者を減らして学部全体の倍率を4倍にしたい。このとき、Ａ学部以外の合格者は何人減らせばよいか、1というものです。 Exelのゴールシークについて 基本的な質問で大変恐縮です。 エクセルのシートの B1に、=IRR(C1:F1) C1に、-800,000 D1に、70,000 E1に、70,000 と入力したうえで「ツール」の「ゴールシーク」で「数式入力セル」をB1,「目標値」を10％、「変化させるセル」をF1としてOKを押すと、 「セルに入力した数式の計算結果は数値でなければなりません」というメッセージが出てきます。 どこかやり方がまずいのだと思うのですが、どこがいけないのでしょうか？？ 注目のQ&A 「You」や「I」が入った曲といえば？ Part2 結婚について考えていない大学生の彼氏について 関東の方に聞きたいです 大阪万博について 駅の清涼飲料水自販機 不倫の慰謝料の請求について 新型コロナウイルスがもたらした功績について教えて 旧姓を使う理由。 回復メディアの保存方法 好きな人を諦める方法 小諸市（長野県）在住でスキーやスノボをする方の用具 カテゴリ パソコン・スマートフォン ソフトウェア Excel（エクセル）Word（ワード）PowerPoint（パワーポイント）Access（アクセス）その他MS Office製品オフィス系ソフトPhotoshop（フォトショップ）Illustrator（イラストレーター）その他Adobe製品画像・動画・音楽編集ホームページ作成ソフト筆まめ・はがき作成フリーウェア・フリーソフトその他(ソフトウェア) カテゴリ一覧を見る OKWAVE コラム 突然のトラブル？プリンター・メール・LINE編 携帯料金を賢く見直す！格安SIMと端末選びのポイントは？ 友達って必要？友情って何だろう 大震災時の現実とは？私たちができる備え 「結婚相談所は恥ずかしい」は時代遅れ！負け組の誤解と出会いの掴み方 あなたにピッタリな商品が見つかる！ OKWAVE セレクト コスメ化粧品 化粧水・クレンジングなど 健康食品・サプリ コンブチャなど バス用品 入浴剤・アミノ酸シャンプーなど スマホアプリ マッチングアプリなど ヘアケア 白髪染めヘアカラーなど インターネット回線 プロバイダ、光回線など
お礼
Venzouさん、有難うございました。 早速試してみます。