目的セル A1
変化させるセル B1:E1
から始めて、A2,B2:E2、A3,B3:E3・・・
というように行を一列ずつずらして繰り返したいと思いプログラミングの知識とか全然ないんですが、あちこち調べて、
Sub Macro1()
Dim x As Integer
For x = 1 To 5
SolverOk SetCell:="Cells(x,1)", MaxMinVal:=3, ValueOf:="1", ByChange:="Range(Cells(x,2),Cells(x,5))"
SolverSolve Userfinish:=True
Next x
End Sub
というところまで作ってみたんですが、実行してみると一行目は変わるもののそれ以降が変化しません。
理由がまったくわからないんですが、どなたかおかしなところがわかる方お教えくださいm(__)mm(__)m
No.1ベストアンサー
- 回答日時:
ソルバーは使った事がありません。
提示されたコードを見ると、引数の設定が、"(ダブルクオーテーション)で挟まれています。
これでは単なる文字列ということになってしまいます。
セル番地を入れればよいのでしょうか?
SolverOk SetCell:="Cells(x,1)", MaxMinVal:=3, ValueOf:="1", ByChange:="Range(Cells(x,2),Cells(x,5))"
を
SolverOk SetCell:=Cells(x, 1).Address, MaxMinVal:=3, ValueOf:="1", ByChange:=Range(Cells(x, 2),Cells(x, 5)).Address
とするとどうなるでしょうか?
No.2
- 回答日時:
こんばんは。
ソルバーのマクロは、もともと旧マクロですから、それをVBAで行うには、ちょっとしたコツが必要なはずですが、単に、クォーテーションの囲んだ部分を、Address に変えてそれで出来るようになれば、こちらからのアドバイスは必要ありません。単に、記録マクロだけではうまくいかないような気がしますが、ご質問では、数式などの情報がありませんので分かりません。
>変化させるセル B1:E1
仮に出来ても、そのまま変化されていったら、5回やっても、同じ結果が出るのではないかと思います。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VBAで組み合わせ算出やCOUNTIFSの処理を高速化したいです。 4 2022/04/07 02:38
- Visual Basic(VBA) マクロ実行時、自動で背景色を変えたい。 C列にあるチェックボックスをチェックするとB列に「TRUE」 4 2022/11/08 11:14
- Visual Basic(VBA) vbaでセルに入力したときに,その横にあるセルを保護し入力不可にするマクロを作りたいです。 2 2022/04/24 20:59
- Visual Basic(VBA) ExcelVBAのマクロについて。 9 2022/05/04 14:50
- Visual Basic(VBA) Sheet1のA列にコードB列にメアド、Sheet2のB列にコード一覧とD列にメアド一覧があり、Sh 3 2022/10/19 11:57
- Excel(エクセル) エクセルで同じ数字同士を自動で線で結ぶVBAを教えてください 6 2022/04/26 23:13
- Visual Basic(VBA) Excelで下記のようにマクロを作ったところ、一回目は実行できたのですが、二回目以降「実行時エラー1 1 2022/03/25 08:08
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
- Visual Basic(VBA) 乱数の表示 4 2022/10/12 10:43
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
【Excel】マクロにソルバーを組み込んだ時の対処方法
Excel(エクセル)
-
ExcelのVBAを使い、複数シートの同一箇所を、同一条件にて一括でソルバーを回す方法について
Visual Basic(VBA)
-
VBAでソルバーを停止せずに動かすには
Excel(エクセル)
-
-
4
EXCELのマクロが回してる途中から遅くなり、困っています
Excel(エクセル)
-
5
エクセル ソルバー セル参照をVBAで
Excel(エクセル)
-
6
変化させるセルが変化しない
Visual Basic(VBA)
-
7
Excel のユーザー定義関数でソルバーが動作しない
Visual Basic(VBA)
-
8
エクセル 合計値に一番近い件数を出したい
Excel(エクセル)
-
9
Excelでエラー(#N/Aなど)値を含む範囲で最大値や最小値をもとめ
その他(Microsoft Office)
-
10
エクセル・ソルバー機能についての質問です。
Excel(エクセル)
-
11
SubまたはFunctionが定義されていません
その他(Microsoft Office)
-
12
Excelのsolver実行の手間を省きたい
Excel(エクセル)
-
13
陰関数表示と関数
Excel(エクセル)
-
14
エクセルマクロ:ソルバーの反復計算を中止する
Excel(エクセル)
-
15
エクセル:マクロ メッセージボックスを消す
Excel(エクセル)
-
16
VBAでシート書式の自動変換を作動させない方法
Excel(エクセル)
-
17
2変数関数の近似曲線
数学
-
18
初歩的な事だと思います。 Sub または Function が定義されていません。
Visual Basic(VBA)
-
19
ラジカル重合において、高分子量の重合体を得るための条件
化学
-
20
エクセルの表で一定の数量を超える前までの合計を算出することを繰り返す方法
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
クリックすると文章が表示され...
-
Excelでセルをクリックす...
-
Excel内での検索結果をシート...
-
Excelで、図形内の文字をセルに...
-
[EXCEL] フォント変更が正常に...
-
シート保護とグループ化機能を...
-
現在のセルの位置を返す関数は...
-
Excel ハイパーリンクのURLを別...
-
VBAでセル内の指定した文字を太...
-
VBA 見つからなかった時の処理
-
セルの値が変ると自動でマクロ...
-
フォントの色を指定して削除出...
-
エクセルでセルをダブルクリッ...
-
[エクセル VBA]テキストファ...
-
太字に設定されているセルの個...
-
Excel:セルの値(文字列)を数...
-
Excelで任意の塗りつぶし色の数...
-
アポストロフィーの一括挿入 ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
Excelで、図形内の文字をセルに...
-
マクロを実行すると画像がズレ...
-
クリックすると文章が表示され...
-
Excelでセルをクリックす...
-
太字に設定されているセルの個...
-
Excelで挿入した図をセルの中央...
-
現在のセルの位置を返す関数は...
-
セルがクリックされた回数をカ...
-
エクセルでの検索ボックスの作...
-
Excel ハイパーリンクのURLを別...
-
エクセルでPDFリンクを大量...
-
Excel2007 色のカウント (VBA)
-
フォントの色を指定して削除出...
-
【EXCEL】先週の月曜日の日付を...
-
VBA 見つからなかった時の処理
-
エクセルでページ数をあるセル...
-
空白セルを空セルに置き換える...
おすすめ情報