![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
目的セル 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でエラー(#N/Aなど)値を含む範囲で最大値や最小値をもとめ
その他(Microsoft Office)
-
9
エクセル 合計値に一番近い件数を出したい
Excel(エクセル)
-
10
エクセル・ソルバー機能についての質問です。
Excel(エクセル)
-
11
SubまたはFunctionが定義されていません
その他(Microsoft Office)
-
12
Excelのsolver実行の手間を省きたい
Excel(エクセル)
-
13
陰関数表示と関数
Excel(エクセル)
-
14
エクセル:マクロ メッセージボックスを消す
Excel(エクセル)
-
15
VBAでシート書式の自動変換を作動させない方法
Excel(エクセル)
-
16
2変数関数の近似曲線
数学
-
17
エクセルマクロ:ソルバーの反復計算を中止する
Excel(エクセル)
-
18
初歩的な事だと思います。 Sub または Function が定義されていません。
Visual Basic(VBA)
-
19
ラジカル重合において、高分子量の重合体を得るための条件
化学
-
20
エクセル マクロ ソルバ 中止(T)を選択したい
Word(ワード)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
Excelで、図形内の文字をセルに...
-
セルがクリックされた回数をカ...
-
マクロを実行すると画像がズレ...
-
Excel ハイパーリンクのURLを別...
-
【EXCEL】先週の月曜日の日付を...
-
フォントの色を指定して削除出...
-
エクセルでPDFリンクを大量...
-
Excel2007 色のカウント (VBA)
-
クリックすると文章が表示され...
-
Excelで挿入した図をセルの中央...
-
Excelでセルをクリックす...
-
excelで セルの移動時に...
-
未記入がある場合はマクロを実...
-
VBAで特定の文字以降の文字列の...
-
エクセルでの検索ボックスの作...
-
excelのソルバーをVBAで複数行...
-
エクセル シート保護された共...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
EXCELで特定のセルに表示...
-
エクセル 数字をすべて○などの...
-
Excel内での検索結果をシート...
-
太字に設定されているセルの個...
-
クリックすると文章が表示され...
-
Excelで挿入した図をセルの中央...
-
【マクロ】ファイル名の変更に...
-
Excelで、図形内の文字をセルに...
-
マクロを実行すると画像がズレ...
-
Excel ハイパーリンクのURLを別...
-
フォントの色を指定して削除出...
-
Excelでセルをクリックす...
-
Excel2007 色のカウント (VBA)
-
エクセルでの検索ボックスの作...
-
現在のセルの位置を返す関数は...
-
エクセル マクロ チェックボックス
-
VBA 見つからなかった時の処理
-
アポストロフィーの一括挿入 ...
-
エクセルでPDFリンクを大量...
-
セルの値が変ると自動でマクロ...
おすすめ情報