Excel Maniacs

記録マクロの功罪（３）

　前回は記録マクロの功罪のうち、「罪」の方を述べました。

今回は「功」の方です。

　それはコードの書き方を示してくれるという点です。

例えば、文字の色を赤くしたいと思ったならば、実際に

文字を赤くする操作をして記録マクロにコードを生成させれば

良いのです。すると下のようになります。

!! マクロ記録 : 2007/03/31 17:05:27
Range("A1").SetCurrent()
CurrentCell.CharStyle.Color = RGB(255, 0, 0)

なるほど、こうなるのかとわかります。

セルの背景を赤くしたければ、赤くする操作をして

記録マクロにコードを生成させれば良いのです。

すると下のようになります。

!! マクロ記録 : 2007/03/31 17:05:27
Range("A1").SetCurrent()
CurrentCell.CharStyle.Color = RGB(255, 0, 0)
CurrentCell.CellStyle.BackColor = RGB(255, 0, 0)

先ほどのコードに４行目が追加されました（赤字の行）。

見比べれば文字そのものの色を赤にしたければ

　　　　　CharStyle.Color

で

セルの背景を赤にしたければ

　　　　　CellStyle.BackColor

を弄ればいいということがわかります。

このように記録マクロを使えば、どのようにコードを

書けば良いかというのが（だいたい）わかります。

あと必要なのはちょっとした好奇心です。

(●`ε´●):CurrentCellは現在のセルって意味で・・・

　　　　　　つまり、A1のことだから・・・

Range("A1").SetCurrent()
CurrentCell.CharStyle.Color = RGB(255, 0, 0)

は

Range("A1").CharStyle.Color = RGB(255, 0, 0)

と１行にまとめられるんじゃないか・・・

はい、その通り。まとめられます。もちろん

Range("A1").CellStyle.BackColor = RGB(255, 0, 0)

も有効です。

　ちなみにRGBは光の３原色を示しています。

R･･･Red(赤）, G･･･Green（緑）, B･･･Blue（青）,

各色の度合いを０～２５５の整数値で現し、全て０だと

黒、全て２５５だと白になります。

(●`ε´●):お～、記録マクロって役に立つな！！

特にマクロ解説本が市販されていない三四郎ではな！！

　

記録マクロの功罪（２）

初心者向けを謳っているマクロ解説本を見ると記録マクロから

入っていくものが多いように見受けられます。確かにプログラミングに

関する知識を何一つ持たずにコードが手にはいるのですからお手軽と言えば

これ以上お手軽なものもありません。

　しかし、お手軽でかつ、素晴らしいというものは世の中に数多くは

ありません。記録マクロには大きな弱点があることを意識しておくべきでしょう。

記録マクロの弱点

1. 余計なコードを生成することが非常に多い。
   そのため、コードが煩雑になる傾向がある。
2. 実際にマウスとキーボードで操作できること以外の
   コードは作れない。
   　したがって１０００回繰り返すには同じことを
   １０００回やらなくてはならない。煩わしくてやってられないですよね。
3. ２．と同様の理由で条件判断を含むコードを生成することができない。

以上の理由で、くまぷーは志の高い入門者には記録マクロから入ることを

お奨めしません。多少、敷居が高く感じようとも基礎の文法からしっかり学んだ方が

良いと思います。文法を知らずに会話だ、会話だと狂奔する英語教育のようなもので

定型的な挨拶だけであとはさっぱり・・・となることが多いようです。(-_-;)

今回は記録マクロの功罪の「罪」について述べさせて頂きました。

記録マクロの功罪(1)

　三四郎はユーザがマウスやキーボードで行った操作を

記録して再現する機能を持っています。

この機能は「記録マクロ」と言われています。

(●`ε´●):どうやってやるんだ？

【´･ω･`】:メニューを「ツール」「マクロ」「記録開始」と辿ればいい。

そうすると三四郎が自動的にユーザの行った処理を記録してくれる。

(●`ε´●):記録って？

【´･ω･`】:例えばA1に「くまぷー」と入力するとその操作を三四郎が

プログラムに翻訳してくれるんだ。下が記録マクロで作られたコードだ。

!! マクロ記録 : 2007/03/31 14:02:16

Range("A1").SetCurrent()
CurrentCell.Formula = "くまぷー"

３行あるが、最初の緑の行はコメントと呼ばれていて

プログラムの実行時には無視される。

単なる説明のための行だ。

行頭に感嘆符を二つ入力するとその行はコメントになる。

(●`ε´●):ではＡ１に「くまぷー」と書き込むのに必要なのは

下の２行ということなんだな？

【´･ω･`】:：うん。

(●`ε´●):ちょっと解説してくれ。

【´･ω･`】:ＯＫ。Range("A1")はセルＡ１を示している。

SetCurrent()はアクティブにする、ということだ。

だからRange("A1")とSetCurrent()を「．」（ドット）でつないで

　　　　　　　　　　　　　　Range("A1").SetCurrent()

と記述するとセルＡ１をアクティブにしなさい、という命令になる。

(●`ε´●):セルをマウスでクリックしたりするとそのセルの枠が

黒太表示になって文字などを入力できるようになる。

この状態をアクティブって言うんだったよな？！

【´･ω･`】:うん。

(●`ε´●):で、次は？

【´･ω･`】:CurrentCellは現在のアクティブセル。

(●`ε´●):つまり、Ａ１だな？！

【´･ω･`】:うん。Formulaは式。つまり、Ａ１の式として「くまぷー」を

代入しなさいということ。

この２行を実行するとＡ１に「くまぷー」と入力したのと同じことになる。

(●`ε´●):「くまぷー」ってのは式じゃないだろ？

【´･ω･`】:うん、でも記録マクロを使うとそういうコードが

生成されてしまうんだ。実際には自動記録で生成されるコードは

冗長なものになることが多いんだ。例えばセルＡ１に「くまぷー」入力するだけなら、

　　　　　　　　　　Range("A1") = "くまぷー"

の１行で十分だし・・・。

(●`ε´●):この方がすっきりしているな。

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　（続く）