当サイトは各記事にプロモーションが含まれています

MYPROTEIN
おすすめの味

GronG
おすすめの味

ULTORA
おすすめの味

ON
おすすめの味

Pick up!

筋トレ・サプリ

 
マイプロテインってどんなブランド?【おすすめな理由を徹底解説】

マイプロテインってどんなブランド?【おすすめな理由を徹底解説】

2021/04/16
 
【GronG/グロング】スタンダードとベーシックの違いは?【おすすめが決定】

【GronG/グロング】スタンダードとベーシックの違いは?【おすすめが決定】

2022/06/15
 
【1番おすすめのホエイプロテインが決定】勝手に点数評価して比較しました

【1番おすすめのホエイプロテインが決定】勝手に点数評価して比較しました

2021/05/15

働き方

 
社会人の「つまらない」を抜け出す方法を解説【行動の意味を考える】

社会人の「つまらない」を抜け出す方法を解説【行動の意味を考える】

2022/02/18
 
【徹底解剖】テックアカデミーのフロントエンドコースの情報まとめ

【徹底解剖】テックアカデミーのフロントエンドコースの情報まとめ

2022/10/19
 
【初心者必見】VBAで業務効率化を実現するまでのロードマップ【6つの手順で実現】

VBAで業務効率化を実現するまでのロードマップ【6つの手順で実現】

2021/04/13

エンタメ

 
【徹底解剖】アローバースを理解するための完全ガイド【見どころをまとめました】

アローバースを理解するための完全ガイド【見どころをまとめました】

2021/04/26
 
【トム・ハーディ】おすすめ映画5作品

【トム・ハーディ】おすすめ映画5作品

2019/03/09
 
【どんな役でもこなす俳優マーク・ウォールバーグ】おすすめ映画17選

【どんな役でもこなす俳優マーク・ウォールバーグ】おすすめ映画17選

2020/03/22

コラム

 
【入院前に必ず読んでください】病室での生活を快適にする便利グッズを紹介【体験談あり】

病室での生活を快適にする便利グッズを紹介【体験談あり】

2021/05/24
 
入院時におすすめのWi-Fiレンタルサービスを紹介

入院時におすすめのWi-Fiレンタルサービスを紹介

2021/07/20
 
【健康に良いおすすめの入浴剤は?】入浴剤を悩みに沿ったおすすめ10選

【健康に良いおすすめの入浴剤は?】入浴剤を悩みに沿ったおすすめ10選

2020/03/16

新着&プロフィール

【Excelマクロ】VBAで表示できるメッセージボックスの種類を紹介【MsgBox】

【Excelマクロ】VBAで表示できるメッセージボックスの種類を紹介【MsgBox】

この記事では、VBAで表示することができるメッセージボックスの種類を紹介しています。

 

VBAをこれから使い始めるという方は以下の記事をご覧ください。

 

それでは、順番に紹介していきます。

①ノーマルメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。

  MsgBox "成功!" 

 

②「はい」「いいえ」表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「はい」をクリックすると「表示します」、「いいえ」をクリックすると「表示しません」とメッセージボックスが現れます。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbYesNo, "確認")
    If msg = vbYes Then
        MsgBox "表示します"
    Else
        MsgBox "表示しません"
    End If

 

③「OK」「キャンセル」表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「OK」をクリックすると「表示します」、「キャンセル」をクリックすると「表示しません」とメッセージボックスが現れます。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbOKCancel, "確認")
    If msg = vbOK Then
        MsgBox "表示します"
    Else
        MsgBox "表示しません"
    End If

 

④「中止」「再試行」「無視」表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「中止」をクリックすると「中止します」、「再試行」をクリックすると「再試行します」、「無視」をクリックすると「無視します」とメッセージボックスが現れます。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbAbortRetryIgnore, "確認")
    If msg = vbAbort Then
        MsgBox "中止します"
    ElseIf msg = vbRetry Then
        MsgBox "再試行します"
    ElseIf msg = vbIgnore Then
        MsgBox "無視します"
    End If

 

⑤「はい」「いいえ」「キャンセル」表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「はい」をクリックすると「表示します」、「いいえ」をクリックすると「表示しません」、「キャンセル」をクリックすると「キャンセル」とメッセージボックスが現れます。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbYesNoCancel, "確認")
    If msg = vbYes Then
        MsgBox "表示します"
    ElseIf msg = vbNo Then
        MsgBox "表示しません"
    ElseIf msg = vbCancel Then
        MsgBox "キャンセル"
    End If

 

⑥「再試行」「キャンセル」表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「再試行」をクリックすると「再試行します」、「キャンセル」をクリックすると「キャンセル」とメッセージボックスが現れます。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbRetryCancel, "確認")
    If msg = vbRetry Then
        MsgBox "再試行します"
    ElseIf msg = vbCancel Then
        MsgBox "キャンセル"
    End If

 

⑦警告アイコン表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「vbCritical」で警告アイコンを表示させています。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("危険な状態です?", vbRetryCancel + vbCritical, "確認")
    If msg = vbRetry Then
        MsgBox "再試行します"
    ElseIf msg = vbCancel Then
        MsgBox "キャンセル"
    End If

 

⑧問い合わせアイコン表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「vbQuestion」で警告アイコンを表示させています。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbRetryCancel + vbQuestion, "確認")
    If msg = vbRetry Then
        MsgBox "再試行します"
    ElseIf msg = vbCancel Then
        MsgBox "キャンセル"
    End If

 

⑨注意アイコン表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「vbExclamation」で警告アイコンを表示させています。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbRetryCancel + vbExclamation, "確認")
    If msg = vbRetry Then
        MsgBox "再試行します"
    ElseIf msg = vbCancel Then
        MsgBox "キャンセル"
    End If

 

⑩情報アイコン表示のメッセージボックス

マクロ実行後

以下のプログラムで表示させることができます。「vbInfomation」で警告アイコンを表示させています。詳細は以下のページをご覧ください。

    Dim msg As Integer
    msg = MsgBox("表示しますか?", vbRetryCancel + vbInfomation, "確認")
    If msg = vbRetry Then
        MsgBox "再試行します"
    ElseIf msg = vbCancel Then
        MsgBox "キャンセル"
    End If

 

以上、VBAで表示できるメッセージボックスの種類紹介でした。

下記の書籍は、とても読みやすく簡潔にマクロの使用方法が書かれているので、作業効率化のために勉強しようと思っている人にはとてもおすすめです。

また、マクロはショートカットキーを設定することもできます。もし、興味がある方は以下をご覧ください。