ExcelVBA第12単元は、IF関数の条件判断において、複数の条件を判断し処理するプログラムの解説になります。

第12単元　IFとANDの組み合わせ

IFとANDの組み合わせ

●ソース

Private Sub CommandButton1_Click( )

a=Range(“b4”).Value　//変数aにセルB4の内容を入れる

b=Range(“d4”).Value　//変数ｂにセルD4の内容を入れる

c=Range(“f4”).Value　//変数ｃにセルF4の内容を入れる

If a=b And a=c Then　//もしa=bとa=cのどちらにも条件が一致する場合は

Range(“c10”).Value=”同じ”　//セルC10に”同じ”と表示する

Else　//もし条件が一致しない場合は

Range(“c10”).Value=”違う”　//セルC10に”違う”と表示する

End If　

End Sub