コンパイルエラー
SubまたはFunctionが定義されていません。
どこか間違いありますでしょうか?
--------------------------------------------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Long, imax As Long
If Intersect(Target, Range("C1")) Is Nothing Then Exit Sub
imax = Cells(Rows.Count, 1).End(xlUp).Row
SolverReset
SolverOk SetCell:=Range("E3"), MaxMinVal:=3, ValueOf:=Range("C1").Value, ByChange:=Range("F3:F" & imax), _
Engine:=1, EngineDesc:="GRG Nonlinear"
For i = 4 To imax
SolverAdd CellRef:=Range("E" & i), Relation:=2, FormulaText:=Range("C1").Value
Next i
SolverSolve
End Sub
No.2
- 回答日時:
No.1 の補足
ソルバー アドインを有効にしていないだけかもしれません。
返信が遅くなり申し訳ありません。
VBEditor ツール-参照設定
Solver チェック
で作動しました。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
- Visual Basic(VBA) 稀に1円合いません? Sheet1から金額と個数を貼り付ける下記コードで、金額を切り上げるコードを何 3 2022/09/05 15:11
- Visual Basic(VBA) excel vbaでvlooupの変数がわかりません。 7 2022/05/30 09:35
- Visual Basic(VBA) VBA処理追加 こちらでご教示頂いたのですが回答完了させてしまいましたのでこちらからまた質問させてく 2 2022/10/27 09:57
- Visual Basic(VBA) 数字が「0」の列を削除するため、下記のコードを実行しましたが、コンパイルエラーSubまたはFunct 3 2022/12/04 00:00
- Visual Basic(VBA) 別シートのデータを参照して値を入れたい。 まとめデータシートのC列D列の値を商品一覧シートのコードが 7 2022/08/17 13:20
- Visual Basic(VBA) 前回ご教授いただいたコードに覚えたてのループ処理で品名りんごAから順に20回for nextでループ 7 2023/01/13 22:01
- Visual Basic(VBA) excel2021で実行できないマクロ。どこを直したらいいのか 2 2022/03/28 03:40
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
初歩的な事だと思います。 Sub または Function が定義されていません。
Visual Basic(VBA)
-
Excel VABについて 下記記述が『SubまたはFunctionが定義されていません』とエラーメ
Visual Basic(VBA)
-
SubまたはFunctionが定義されていません
その他(Microsoft Office)
-
-
4
EXCELのVBAでRange(A1:C4")を変数にする方法を教え"
Visual Basic(VBA)
-
5
コンパイルエラーSubまたはFunction定義
Visual Basic(VBA)
-
6
subまたはfunctionが定義されていません。
Visual Basic(VBA)
-
7
実行時エラー 438になった時の対処法を教えて下さい。
Visual Basic(VBA)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
エクセルのVBA 特定のセルでエンターキーでマクロ実行
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
女性器が見えている映画
-
「」と『』の使い分け
-
韓国の映画、ドラマ作品を教え...
-
アダルトグッズの捨て方が分か...
-
暴れん坊将軍
-
映画「ローマの休日」の終わり...
-
「今会いにゆきます」の巧の病...
-
絶賛募集中
-
「全作品観た」ことを一言でい...
-
読後感が良い、の映画の言い方は?
-
見せると見させるの違い
-
デジタルサイネージに映像を流...
-
どうして性器を見せてはいけな...
-
映画のタイトルは『』か「」か
-
外国映画と日本の映画の違いっ...
-
映画の上映時間について 久々に...
-
俗語「じゃりぱん」とは何?
-
ドリカムのSAYONARAの歌詞の意味
-
映画やアニメなど何かの作品を...
-
「オペラ座の怪人」のメグのお...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
女性器が見えている映画
-
「」と『』の使い分け
-
映画館の中で写真撮ってる人が...
-
「全作品観た」ことを一言でい...
-
暴れん坊将軍
-
専門学生でも学生証があれば大...
-
読後感が良い、の映画の言い方は?
-
映画「ローマの休日」の終わり...
-
付き合っていない男の子と2人で...
-
アダルトグッズの捨て方が分か...
-
スタジオジブリ作品「耳をすま...
-
猿の惑星(2001年)のラス...
-
映画のタイトルは『』か「」か
-
何で映画の終わりに「終」「完...
-
パニックルーム(ネタバレ)
-
映画やアニメなど何かの作品を...
-
「ALWAYS三丁目の夕日」の夕日...
-
韓国の映画、ドラマ作品を教え...
-
デジタルサイネージに映像を流...
-
映画の特典だけ欲しいのですが...
おすすめ情報