No.1ベストアンサー
- 回答日時:
Dim ret
ret = Msgbox(Cells(i, 1) & Cells(i, 2) & Cells(i, 3), vbOKCancel)
If ret = vbOk Then
MsgBox "OK"
ElseIf ret = vbCancel Then
MsgBox "Cancel"
End If
No.3
- 回答日時:
こんにちは。
maruru01です。MsgBox関数は処理の結果を整数として返します。
そして、その数値を表す定数がVBA(VB)には用意されています。
vbCancel
vbOk
vbYes
などです。
コーディングとしては、
Dim ret As Long
ret = MsgBox(省略)
If ret = vbOk Then
'OKの場合の処理
Else
'OK以外の場合の処理
End If
という感じでしょうか。
戻り値の定数のリストについては、オブジェクトブラウザで確認して下さい。
オブジェクトブラウザは、VBE画面で、メニューの[表示]→[オブジェクトブラウザ]で表示されます。
そこで、[クラス]で「vbMsgBoxResult」を選択すると、隣りにメンバが表示されます。
そして個々のメンバを選択すると、下にその定数の数値が表示されます。
これによれば、vbOk=1なので、
If ret = 1 Then
としてもいいわけです。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルVBA(実行時エラー438)の対処法を教えてもらえないでしょうか 3 2023/04/22 13:43
- Visual Basic(VBA) vbaを早くしたい 5 2022/09/09 10:58
- Excel(エクセル) マクロで列を加えたら上手くいかなくなりました。 2 2022/05/23 17:59
- Visual Basic(VBA) vba 等間隔の列に対しての計算 6 2022/05/17 20:15
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Excel(エクセル) VBAで “:” を含むセルの特定 2 2023/05/11 16:30
- Visual Basic(VBA) VBAで最新のデータを別シートに転記する方法をお教えください。 3 2022/04/07 19:20
- Visual Basic(VBA) VBAでのループ順序について 3 2023/03/13 10:55
- Visual Basic(VBA) VBA初心者です。 2 2022/10/10 11:52
- Visual Basic(VBA) VBAコードが作動せず、どこに問題があるのか教えて下さい。 3 2023/06/13 13:20
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
パソコンへの「Dropbox...
-
エクセルでマクロを実行中に「...
-
今日スマホでネットをしていた...
-
AccessのMsgBox表示位置について
-
リストボックスの全行表示
-
メディアプレーヤー11の使用...
-
携帯サイトでカテゴリボックス...
-
VBAでの引数かっこの使い方がよ...
-
VBA シートのボタン名を変更し...
-
worksheetFunctionクラスのVloo...
-
ユーザーフォームを表示中にシ...
-
実行時エラー 438になった時の...
-
vbaのエラー対応(実行時エラー...
-
vb.netで画面のコントロールId...
-
VBA(エクセル)で自動的にボタン...
-
エクセル・VBA CheckBoxのオブ...
-
「Columns("A:C")」の列文字を...
-
【C#/Java?】try-catchでcatch...
-
特定の名前のオートシェイプの...
-
VBS実行時エラー オブジェクト...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
パソコンへの「Dropbox...
-
VBA listBoxから
-
今日スマホでネットをしていた...
-
エクセルでマクロを実行中に「...
-
Excel VBA コンボボックスについて
-
リストボックスの全行表示
-
VAB:メッセージボックスの色に...
-
Access メッセージボックスで文...
-
VB.net コンボボックス
-
NEXUS 7で自炊したPDFが読めま...
-
Excel VBAでMsgboxの値を取得す...
-
QT グループボックスについて
-
メッセージボックスの再表示の方法
-
Excelで、リストボックスでカテ...
-
サービスアプリからメッセージ...
-
AccessのMsgBox表示位置について
-
windows10 上にぴょこぴょこ出...
-
お世話になります access初心者...
-
処理中メッセージを出しておき...
-
画面上の文字が表示されない
おすすめ情報