(e1nw) VBA体験

VBAどのような動きをするのか体験します

(1)準備

エクセルを起動し、下図のデータを準備します
ワークシートのセルC3を選択します

(2) VBAの作成

ツールメニュー：[マクロ(M)...]：[Visual Basic Editor(V)]を選択します
下図の画面が表示されます、画面の右側半分にコードを入力します
- もし右側の画面が表示されないときは、挿入メニュー：[標準モジュール]で表示されます

(3) 入力するコード

下のコードをコピーして、Module側でペーストしてもOKです

Sub FontColr()
For n = 1 To 5
Selection.Font.ColorIndex = n
ActiveCell.Offset(1, 0).Select
Application.Wait Now() + TimeValue("00:00:01")
Next n
End Sub

(4) 各行のコードの意味

ここからFontColrというVBAの記述が始まります
nを1つづつ増やしながら以下を５回くりかえしなさい
選択した部分の文字の色をnに変化しなさい
選択したセルの下を選択しなさい（下側へ移動）
今から1秒間待ちなさい
Forへ戻りなさい。
ここでFontColrというVBAの記述は終りです

(5) ブック側に戻る

画面下側にあるスタートバー：Excel Book1をクリックします。これで、元のブックの世界へ戻れます

(6) VBAを実行する

ワークシートのセルC3　が選択されているのを確認します
ツールメニュー：[マクロ(M)]：[マクロ(M)...]を選択します
下図のダイアログが表示されます
自分が実行したいVBAを選択します。ここではFontColrを選択して、[実行]ボタンを押します

(7) 実行結果

うまくゆけばVBAがとろとろと実行して、下図のようになります

(8) 保存

ブックにFontColrという名前をつけて保存しておきます

続き

(e1pw) VBA IF文へ続きます

2022/01/20：更新 2003/04/28：登録訪問者：カウンタ