(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文 へ続きます

---

2003/04/28：登録　2011/11/04：更新　訪問者数： エクセル

---