VBA再入門
セルの値によって計算を変える（Ifステートメント）

以下の表を使いましょう。


単価が、税込み単価と、税抜き単価が混在している表になります。
C列に単価が税込みか税抜きかの区分が入っています。
単価が税込なら、単価×数量
単価が税抜きなら、単価×数量×1.08
このようにして税込み金額を求めるという計算になります。
消費税の端数に関しては、今回は無視します。
端数処理には、関数が必要になりますので、関数は今後説明します。
まずは、全て税込みとして計算する場合、

では、今度は、全て税抜きとして計算する場合、

税込み、税抜きの計算はできたので、
後は、C列の税込/税抜を判断して、計算を切り替えればよいという事です。

処理を分けるには、
Ifを使います。
用語としてはIfステートメントと言います。
条件により、処理を分けることが出来ます。

ここは理屈はあまり必要としません。
ステップインF8で、どのように動いているかを確認してください。
必ず、ステップインF8で確認してください。
「こんなのステップインF8じゃなくても分かるよ」
と言いたいかもしれませんが、必ずステップインF8で確認してください。
こういう些細な事の経験の積み重ねが、後々に生きてくるのです。
そういう経験なしに、上達はあり得ないのです。
最後に練習問題を掲載していますので、ぜひ取り組んでください。

・真(True)の場合とは、
　条件式の結果が正しい場合の事です。
・偽(False)の場合とは
　条件式の結果が間違っている場合の事です。
If Cells(1, 1) = 100 Then
この時、
A1セルに100が入っていれば真(True)
A1セルに100が入っていなければ偽(False)
真(True)の場合の処理、偽(False)の場合の処理には、
それぞれ複数行の命令（処理）を書けます。

Ifをネスト（入れ子）することが出来ます。
つまり、Ifの中にさらにIfを入れることが出来るという事です。
If 条件式1 Then
　　If 条件式2 Then
　　　　条件式1が真、かつ、条件式2が真
　　Else
　　　　条件式1が真、かつ、条件式2が偽
　　End If
Else
　　If 条件式2 Then
　　　　条件式1が偽、かつ、条件式2が真
　　Else
　　　　条件式1が偽、かつ、条件式2が偽
　　End If
End If

シートでは、AND関数、OR関数がありますが、
マクロVBAでは、AndやOrは論理演算子と言います。
And演算子

書籍やネットでは真っ先に紹介している場合を見かけますが、むしろ、後回しにして覚えた方がよいでしょう。
それでも、やはり気になる方も多いと思うので、どういうものかだけ紹介しておきます。
VBAでの条件分岐が、多分岐になる場合があります。
多分岐とは、
1なら・・・
2なら・・・
3なら・・・
というように、多岐に処理を分岐する場合です。
このような場合は、
Ifでは、ElseIfを使った書き方になります。
また、Select Caseを使う書き方もあります。
ElseIfはコードが少し読みずらくなりますので、むしろSelect Caseを使った方が良いです。
Select Caseを使うと、記述が簡潔になりますし、使えると非常に便利なものです。
ただし、基本はIfなので、これをしっかりとマスターしてから、Select Caseを勉強してください。
少なくとも、覚えるのはこのシリーズを終えてからでも遅くはありません。
今は、そういうものがあるという事だけ知っていれば十分です。

プログラミングは、
繰り返し(For)と条件分岐(If)で全体の流れを作りつつ、関数・機能を使い処理を書く
という事です。
書籍やネットの情報のほとんどは、関数・機能について書かれています。
もちろん、関数・機能を知らなければマクロVBAを書き進めることはできませんが、それだけでは書けないのです。
そして、プログラミングの本質・品質は、繰り返し(For)と条件分岐(If)で決まるものです。
前回までのForと今回のIfが、プログラミングの基礎であり、最重要かつ最優先にマスターすべきことです。
これらをマスターする良い方法は・・・
とにかく書いて、とにかく実行する
これしかありません。
とにかく書いて、納得するまで何度でもスッテプインF8で実行してください。
結局、マクロVBAが覚えられないという人の多くは、
この繰り返し(For)と条件分岐(If)が上手く書けないという場合がほとんどなのです。
関数・機能については、今後説明していきますが、
関数は、シートの関数とセットで覚えるようにします。
機能は、手作業で使うエクセルの機能とセットで覚えるようにします。
これらは、何回か後の回に詳しく説明します。

F列に5科目の合計を出力します。
G列に"合格"と"不合格"を判定して出力します。
・合格の条件
　合計が350点以上、かつ、英語・数学・国語の3教科は全て70点以上である事


上記のどちらでも動作は同じです。
両方書いてみて下さい。
Ifの書き方はいろいろあり、どれが良いとは一概に言えません。
どのような書き方が良いかというと・・・
あなたにとってわかり易い書き方が一番良いのです。
書き写しで構いません。
しかし、必ずステップインF8で実行して、しっかりと確認してください。
※VBAコードの掲載方法について

VBAコードがあまり横に長くなってしまうと見づらくなります。
そういう時は、改行して書くことが出来ます。
半角スペースに続けて_(アンダーバー)を書くことで、続きを次の行に書けます。
この改行方法も含めて、実際に上の画像を見ながら書いてみて下さい。

第20回.条件分岐（If）

第21回.条件分岐（ElseIf）

第22回.条件分岐（Select Case）

第14回.文字の結合(&アンパサンド)と継続行(_アンダーバー)

Ifステートメントは、プログラムの根幹であり極めて重要です。
習得の過程で、以下の記事も是非ご参考にお読みください。
素直なプログラミング

IF文の整理と論理的思考

条件式のいろいろな書き方

実は奥が深いIfステートメント

同じテーマの記事
新着記事
アクセスランク