【Excel】If…Else文のフローチャートを作図する

今回は、2026年2月15日の「図形をセルの枠線に合わせる設定でコマンドボタンのON,OFF表示ができるようにするには？」のブログ記事で使用した次の「If…Else文」をフローチャートで作図してみたいと思います。

Private Sub CommandButton1_Click()

Application.CommandBars.ExecuteMso "SnapToGrid"                  'リボンの「枠線に合わせる」ボタンを押す操作をします。
    
   If Application.CommandBars.GetPressedMso("SnapToGrid") Then   '「枠線に合わせる」ボタンがONのときは。
    
      ActiveSheet.CommandButton1.Caption = "ON"
      MsgBox "図形を「枠線に合わせる」設定をONにしました。"
        
   Else                                                          '「枠線に合わせる」ボタンがOFFのときは。
    
      ActiveSheet.CommandButton1.Caption = "OFF"
      MsgBox "図形を「枠線に合わせる」設定をOFFにしました。"
        
   End If
   
End Sub

このプログラムは「If…Then…Else…End If 」の1つの条件による分岐で記述されていて、先ずはセルの「枠線に合わせる」設定を有効にして、次に図形をセルの「枠線に合わせる」設定が有効か無効かを判断し有効の場合はボタンの表示をONにして、無効の場合はOffにするようにしています。

実際にエクセルでフローチャートを作図すると次のようになります。

文字数が多いので、ひし形の図形はフォントサイズ「8」で他の図形は「9」で設定しています。

次の3つの記事を参考にして頂くと作図が楽に行えると思います。