下記のマクロを実行すると
メッセージボックスが表示され、「はい(Y)」をクリックすると
マクロ「Call 都市計画区域内」が実行されます。
このマクロを
画像のようにメッセージボックスの表示を
「区域内」「区域外」「キャンセル」として
「区域内」をクリックするとマクロ「Call 都市計画区域内」が実行
「区域外」をクリックするとマクロ「Call 都市計画区域外」が実行
「キャンセル」をクリックするとマクロ実行されないように変更する方法を教えてください。
現状のマクロ
Sub 都市計画()
alert = MsgBox("都市計画区域", vbYesNo + vbQuestion, "都市計画確認")
If alert <> vbYes Then
Exit Sub
End If
Call 都市計画区域内
End Sub
以上となります。
よろしくお願いいたします。

No.2ベストアンサー
- 回答日時:
3つの処理があるButtonsは vbYesNoCancel になります。
この場合「はい(Y)」「いいえ(N)」「キャンセル」と表示されますが、これを変えることはMsgbox関数の使用上できません。
かと言ってフォームで作るのも面倒なので、メッセージを工夫して「区域内なら”はい"を区域外なら”いいえ”、キャンセルの場合はキャンセルを押してください」というようなものとしてはいかがでしょうか。
あとは戻り値をSelect ~CaseでYesとNoの場合の処理を設定するとよいかなと思います。(それ以外は排他的に無処理)
一応サンプル掲載します。
Sub 都市計画()
alert = MsgBox("区域内なら「はい」を区域外なら「いいえ」、キャンセルの場合は「キャンセル」を押してください", vbYesNoCancel , "都市計画確認")
Select Case alert
Case vbYes
Call 都市計画区域内
Case vbNo
Call 都市計画区域外
End Select
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2024/04/08 10:08
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Visual Basic(VBA) Excelのマクロについて教えてください。 1 2024/11/27 15:06
- その他(ニュース・社会制度・災害) 工業専用区域は都市計画区域に入るのでしょうか? 3 2023/12/20 09:48
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2024/03/28 12:00
- Visual Basic(VBA) エクセルのVBAコードについて教えてください。 2 2024/07/04 10:13
- Visual Basic(VBA) エクセルのマクロについて教えてください。 2 2024/03/26 18:09
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2023/01/23 17:13
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/05/26 17:13
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2023/05/23 16:28
このQ&Aを見た人はこんなQ&Aも見ています
-


VBA Application.Matchについての質問です
Visual Basic(VBA)
-


VBAについて教えて下さい
Visual Basic(VBA)
-


Excelのマクロについて教えてください。
Visual Basic(VBA)
-
-
4

VBAで特定の文字が入った行をコピーして貼り付けたい
Visual Basic(VBA)
-
5

ExcelVBAについて。
Excel(エクセル)
-
6

ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
7

ExcelのVBAコードについて教えてください。
Visual Basic(VBA)
-
8

エクセルの数式について教えてください。
Excel(エクセル)
-
9

エクセルのVBAコードについて教えてください。
Visual Basic(VBA)
-
10

Excelのマクロについて教えてください。
Visual Basic(VBA)
-
11

Excelのマクロについて教えてください。
Visual Basic(VBA)
-
12

エクセル タブの下のメニューを選択 実行するコード
Visual Basic(VBA)
-
13

[Excel VBA]特定の条件で文字を削除&残す処理をするファイルを作成したいです
Visual Basic(VBA)
-
14

考えた式の戻り値が期待通りにならない
Excel(エクセル)
-
15

エクセル 入力があった場合のみ隣の関数を表示
Excel(エクセル)
-
16

エクセルを使ってQRコードを作成したい。
Excel(エクセル)
-
17

年間の医療費のデータがあり、月々の集計をする計算式を教えていただけませんか
Excel(エクセル)
-
18

VBAでセルの書式を変えずに文字列を置換する方法をご教示ください
Visual Basic(VBA)
-
19

Excelの計算で差分を求める場合について
Excel(エクセル)
-
20

if関数。半角文字や全角文字で分ける事ができますか?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAでCOPYを繰り返すと、処理が...
-
【マクロ】並び替えの範囲が、...
-
【マクロ】オートフィルター を...
-
Vba Array関数について教えてく...
-
Vba 型が一致しません(エラー1...
-
【ExcelVBA】値を変更しながら...
-
vbsでのwebフォームへの入力制限?
-
エクセルのマクロについて教え...
-
【ExcelVBA】5万行以上のデー...
-
VBAでセルの書式を変えずに文字...
-
【マクロ】開いているブックの...
-
Vba セルの4辺について罫線が有...
-
vb.net(vs2022)のtextboxのデザ...
-
Excel VBA 選択範囲の罫線色の...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
エクセルの改行について
-
VBAで特定の文字が入った行をコ...
-
WindowsのOutlook を VBA から...
-
Excel 範囲指定スクショについ...
-
【マクロ】シートの変数へ入れ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Vba セルの4辺について罫線が有...
-
vbsでのwebフォームへの入力制限?
-
【ExcelVBA】5万行以上のデー...
-
【マクロ】売上一覧YYYYMMDDHHS...
-
【マクロ】開いているブックの...
-
【マクロ】並び替えの範囲が、...
-
エクセルの改行について
-
エクセルのマクロについて教え...
-
vb.net(vs2022)のtextboxのデザ...
-
VBAでCOPYを繰り返すと、処理が...
-
VBA ユーザーフォーム ボタンク...
-
エクセルのVBAコードと数式につ...
-
エクセルのVBAコードについて教...
-
[VB.net] ボタン(Flat)のEnable...
-
【マクロ】変数を使った、文字...
-
改行文字「vbCrLf」とは
-
質問58753 このコードでうまく...
-
【マクロ】シートの変数へ入れ...
-
ワードの図形にマクロを登録で...
-
算術演算子「¥」の意味について
おすすめ情報














