実は奥が深いIfステートメント
プログラムと言うものは、
条件により処理を分ける。
これにつきます。
そして、その記述をするものが、
Ifステートメントになります。
IFステートメントの基本
If 条件式 Then
'条件式が真(True)の場合の処理
Else
'条件式が偽(False)の場合の処理
End If
条件式は、 真(True)か偽(False)を評価する数式または文字列式を指定します。
例えば、
If A = B Then
'A = B の場合の処理
Else
'A <> B の場合の処理
End If
ここでの、A = Bは、真(True)か偽(False)を返します。
その結果が、
TrueならThen以下を処理します。
FalseならElse以下を処理します。
IFステートメントのいろいろな書き方
Dim A As Boolean
'・・・
If A = True Then
A = True の場合の処理
Else
A = False の場合の処理
End If
特に問題はなさそうですが、
If A = True Then
実はこれは、無駄な記述とも言えます。
もっと省略して書くことができます。
AはTrueかFalseな訳ですから、
If A Then
これだけでも良いのです。
例えば、よくあるのは
If IsNumeric(A) = True Then
IsNumericは、True/Falseを返す関数です。
つまり、IsNumeric(A)は真(True)か偽(False)しか返しませんので、
If IsNumeric(A) Then
これだけで良い事になります。
もちろん、 = True を書いても問題ないですし、
むしろ、初心者には= True を書いた方が解り易いかもしれません。
If IsNumeric(A) <> True Then
これでも良いのですが、
<> True
これは
= False
ですね。
If IsNumeric(A) = False Then
Not演算子 を使って、
If Not IsNumeric(A) Then
このように書いた方が、英文っぽくて格好よくいかもしれません（笑）
上記の場合は、どちらを書いても良いと思います。
むしろ無理に否定形にしないで、
If IsNumeric(A) Then
Else
'・・・
End If
このようにElseに記述した方が理解しやすい場合も多いです。
例えば、
条件式が複雑な場合に無理に否定形を作ろうとして、かえって間違った条件式にしてしまう事もありえます。
では、どのような書き方が良いかというと、
解り易い
そして、読みやすい・解り易い 、これは人により違ってきますし、
何より、単純にVBA記述だけでは何が良いかは断定できない場合も多いものです。
その条件が出てきた背景や、VBAを共有する人たちの共通認識等々、これらによって変わってくるものです。
つまり、読みやすい・解り易い 、これらは時と場合によって変わってきます。
そして次には、VBAを共有する人たちにとって、読みやすい・解り易い、そのようなVBAを書くようにしていきましょう。
同じテーマ「マクロVBA技術解説」の記事
プログラミングの基本～ロジックの組み立て
実は奥が深いIfステートメント
論理積（And）論理和（Or）と真（True）偽（False）の判定
If条件式のいろいろな書き方：TrueとFalseの判定とは
VBAでの括弧()の使い方、括弧が必要な場合
VBAにおけるピリオドとカンマとスペースの使い方
変数とプロシージャーの命名について
文字列置換の基本と応用（Replace）
データクレンジングと名寄せ
ForとIfのネストこそがVBAの要点
新着記事NEW ・・・新着記事一覧を見る
列全体を指定する時のRangeとColumnsの違い｜ツイッター出題回答 (2023-09-24)
シートのActiveXチェックボックスの指定方法｜ツイッター出題回答 (2023-09-24)
ByRef引数の型が一致しません。｜ツイッター出題回答 (2023-09-22)
シートコピー後のアクティブシートは何か｜ツイッター出題回答 (2023-09-19)
Excel関数の引数を省略した場合について｜ツイッター出題回答 (2023-09-14)
セル個数を返すRange.CountLargeプロパティとは｜VBA技術解説(2023-09-08)
記号を繰り返してグラフ作成（10単位で折り返す）｜ツイッター出題回答 (2023-08-28)
シートを削除：不定数のシート名に対応｜VBAサンプル集(2023-08-24)
ランクによりボイントを付ける（同順位はポイントを分割）｜ツイッター出題回答 (2023-08-22)
OneDrive使用時のThisWorkbook.Pathの扱い方｜VBA技術解説(2023-07-26)
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.繰り返し処理（For Next)｜VBA入門
4.変数宣言のDimとデータ型｜VBA入門
5.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
6.マクロとは？VBAとは？VBAでできること｜VBA入門
7.ブックを閉じる・保存（Close,Save,SaveAs）｜VBA入門
8.並べ替え（Sort）｜VBA入門
9.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
10.条件分岐（IF）｜VBA入門
- ホーム
- マクロVBA応用編
- マクロVBA技術解説
- 実は奥が深いIfステートメント
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。