（e1p）VBA字下げとＩＦ文Mac
（１）VBAを開く
前回作成したブックを開きModuleを開きます。
（２）VBAを読みやすくする
３行目のSの左側をクリックして[tab]キーを押して下図のイメージに整形します。
処理自体は全く変わりませんが、今後VBAと付き合ってゆくために見やすいコードになるように、このように字下げをします。こうするとNextからForへ戻る関係がわかりやすくなります。
四角で囲まれたところはこれから下のように変更します。
（３）ＩＦ文を追加する
下図のようにコードを追加します。
このIF文は、もしnが2で割り切れたらセルの色を24に、割り切れなかったらセルの色を19にしなさいという意味です。
（４）追加入力するコード（下のコードをコピーして、Module側で追加ペーストしてもOKです）
If n Mod 2 = 0 Then
Selection.Interior.ColorIndex = 24
Else
Selection.Interior.ColorIndex = 19
End If
（５）VBAを実行する
ブック側を開きます。FONTに色が付いているのでツールバーのフォント色パレットで色を自動に変更します。
セルC3を選択します。ツールメニュー：[マクロ...]を選択してからfontColrを実行します。
（６）実行結果
うまくVBAが実行できると、下図のようになります。
