最近の更新

2016年10月7日金曜日

IF-ELSE文を1行で書く方法

【目的】
VBAでIF-ELSE文を1行で記載します。
※1行に書く場合は『End If』が要らないようです。



【手順1】
1.『標準モジュールの作成方法』の手順で、『MainModule』という標準モジュールを作成。
2.『MainModule』を以下の様に入力。
Option Explicit

Sub main()
    Dim answer As String: answer = "n"
    
    If answer = "y" Then Debug.Print ("YES") Else Debug.Print ("NO")
End Sub

3.『関数を実行する方法』の手順で、main関数を実行。
4.イミディエイトウィンドウが表示されない場合は、『イミディエイトウィンドウの表示方法』でイミディエイトウィンドウを表示させます。
5.以下の様に、イミディエイトウィンドウに以下の様に、出力されれば成功です。
































以上です。

0 件のコメント:

コメントを投稿

注: コメントを投稿できるのは、このブログのメンバーだけです。

関連記事