SolverFinishDialog 関数

問題の解決処理の終了後、結果の処理方法と、レポートの作成方法を指定します。 SolverFinish 関数とほぼ同じ動作ですが、SolverFinishDialog 関数の場合は [ソルバー : 探索結果] ダイアログ ボックスが表示されます。

メモ ソルバー アドインは既定では有効になっていません。 この関数を使う前に、ソルバー アドインを有効にしてインストールしておく必要があります。 この方法については、「ソルバー関連の VBA 関数を使用する」を参照してください。 ソルバー アドインがインストールされたら、このアドインへの参照を設定する必要があります。 Visual Basic エディターでモジュールをアクティブにした状態で、[ツール] メニューの [参照設定] をクリックし、[使用できる参照] の [ソルバー] を選択します。 [Solver] チェック ボックスが [参照可能なライブラリ ファイル] に表示されない場合は、[参照] をクリックして \Program Files\Microsoft Office\Office14\Library\SOLVER サブフォルダーにある Solver.xlam を開きます。

SolverFinishDialog( KeepFinal, ReportArray, OutlineReports)

KeepFinal Optional Variant. Can be either 1 or 2. KeepFinal が 1 または省略された場合、最終的なソリューション値は変更セルに保持され、以前の値が置き換えられます。 KeepFinal が 2 の場合、最終的なソリューション値は破棄され、前の値が復元されます。 ReportArray 省略可能 なバリアント型 (Variant)。 ソルバーの終了時に、どの形式のレポートを作成するかを指定します。

• 解決方法 Simplex LP または GRG Nonlinear を使用する場合、1 を指定すると解答レポート、2 を指定すると感度レポート、3 を指定すると条件レポートが作成されます。

• Evolutionary 解決方法を使用する場合、1 を指定すると解答レポート、2 を指定すると母集団レポートが作成されます。

• SolverSolve が 5 を返す場合 (ソルバーは実行可能なソリューションを見つけることができませんでした)、1 は実現可能性レポートを作成し、2 はFeasibility-Boundsレポートを作成します。

• SolverSolve によって 7 が返される (線形条件が満たされていない) 場合、1 を指定すると線形レポートが作成されます。

表示するレポートを指定するには、 のように、 ReportArray:= Array(1,3) 関数を使ってください。 OutlineReports 省略可能 なバリアント型 (Variant)。 使用できる値は True または False です。 OutlineReports が False または省略された場合、レポートはアウトラインなしで "標準" 形式で生成されます。 OutlineReports が True の場合、レポートは、デシジョン変数と制約に対して入力したセル範囲に対応するアウトライングループで生成されます。

例

次の使用例は、シート 1 に保存されている既存のモデルを読み込み、再びモデルの解を求めてから、2 つの設定に既定値が指定されている状態の [ソルバー : 探索結果] ダイアログ ボックスを表示します。

Worksheets("Sheet1").Activate 
SolverLoad loadArea:=Range("A33:A38") 
SolverSolve userFinish:=True 
SolverFinishDialog keepFinal:=1, reportArray:=Array(1)

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。