VBAMsgBoxかInputBoxの再入力

 ◇-?VBA MsgBoxかInputBoxの再入力-マクロ-06/26-23:22(194)-No.453603
 　 ┗?!Re:VBA MsgBoxかInputBoxの再入�...-独覚-06/27-00:21(193)-No.453611
 　 　 ┗?!【ありがとう】Re:VBA MsgBoxかI...-マクロ-06/27-08:37(185)-No.453628

「何か一言」を書く Facebookコメントができます

▲このページのトップに戻る

453603	VBA MsgBoxかInputBoxの再入力	マクロ	2008/06/26-23:22
メーカー名：富士通 OS名：WindowsXp HomeEdition パソコン名：CE8/85L ソフト関連：表計算Excel 使用回線：光 -- 初めまして。 VBAのMsgBoxかInputBoxの２つともやり方が知りたいんですが、「いいえ」をクリックした時に再入力させる命令を書きたいです。どのように表記すればいいのかわかりません。「質問」「はい」「いいえ」←質問に対して選択「はい」の場合「「はい」が入力されました」「いいえ」の場合「再入力してください」「」←最初の質問に戻るまた「いいえ」の場合「ちゃんと入力してください」←再入力のメッセージ内容を変える「」←最初の質問に戻る ↑のような命令文を書きたいんです。「はい」を押さないとループから抜けられない命令を書きたいわけです。わかる方、返事お願いします。

▲このページのトップに戻る

453611	Re:VBA MsgBoxかInputBoxの再入力	独覚	2008/06/27-00:21
記事番号453603へのコメント RPGなんかであるような「はい」を選ばないと先に進まない質問みたいですが。 Sub test() Dim RET As Integer Dim Msg_TXT As String Msg_TXT = "再入力してください" Do Until RET = vbYes RET = MsgBox("質問", vbYesNo) If RET = vbNo Then MsgBox Msg_TXT Msg_TXT = "ちゃんと入力してください" End If Loop MsgBox "「はい」が入力されました" End Sub InputBoxの場合は応用で。（そもそも「はい」「いいえ」ボタンもないし、どのような仕様にしたいのかわからないので）インデントが消えちゃうみたいなのでそこはご容赦を

▲このページのトップに戻る

453628	Re:VBA MsgBoxかInputBoxの再入力	マクロ	2008/06/27-08:37
記事番号453611へのコメント独覚さんは No.453611「Re:VBA MsgBoxかInputBoxの再入力」で書きました。ありがとうございます！！ InputBoxの場合は「はい」「いいえ」もないですもんね。回答をどうもありがとうございました。

パソコントラブル解決・過去ログTOP > ログTOP > VBAMsgBoxかInputBoxの再入力

何か一言(本ページで参考になったならないを含めて残してあります)
◎：解決　○：参考になった　×：参考にならなかった　！：アドバイスあり

参考	回数	投稿日時	何か一言