VBAをマスターしよう～⑥変数(変数名・宣言と型・使用する利点)～

どうも、今年も残すところあと二、三か月となり、「年の初めにやろうと思っていたことまるでできてないな～」と無駄に綺麗に見え始める星を眺めながら、無駄に煙草を吸いまくっているつづりです。

今回はVBAをマスターしよう第六回目の記事となります。今回からはより実践（現場、仕事など）で使える情報を紹介していきたいと思います。まず、最初は変数についてです。

変数は、マクロを組むにあたって絶対に理解して欲しい部分ですし、勉強して資格を取ろうと考えている人にとっても試験範囲内となっていますので、ぜひこの機にしっかりと覚えて貰えればと思います。

ちなみに、前回は物凄く簡単に表作成のマクロを作るやり方をご紹介させていただきましたので、興味がある方は是非そちらも読んでいただけるとありがたいです。

では、はじめていきましょう。

変数とは？

変数とは『データを記録する・呼び出すための名前を付けた場所』のことです。変数とは『データを記録する・呼び出すための名前を付けた場所』のことです。例えば服などをタンスにしまう際、夏物、冬物、靴下など分けて収納しませんか。このように用途に応じてデータを格納するものが変数となります。

そんな変数ですが、使うにあたって覚えておいて欲しいことがあります。
それが、以下の二つです。

• 変数を使う前には『宣言』がいる。
• 変数にはそれぞれ入れるものによって『型』を変える必要がある。

次からは、この二つの点についてそれぞれ説明していきます。

変数の宣言と型

変数を使用するときは下記のように事前に変数を指定する必要があります。

Sub 変数()

Dim 変数 As Integer

変数 = 100
Cells(2, 2) = 変数

End Sub

上のコードで太字になっている『Dim～』から始まっている箇所が変数の宣言を行っている箇所です。基本的な形は次の通りです。

基本形：宣言　変数名　As　型

より細かく、一つずつ見ていきましょう。

宣言

宣言として最も使われるのが『Dimステートメント』になります。正直これさえ覚えておけば、他のステートメントを覚えていなくても変数を使うことができます。

ちなみにステートメントとはマクロの動きを指示する構文や文法のことです。上のコードの『Sub』もステートメントの一つです。詳しくはいずれ『IF構文』の説明をするときにでもしたいと思いますので、ここでは割愛します。

Dimの他にプロジェクト内全体で使用できる『Publicステートメント』や、宣言したモジュールの中でのみ使用できる『Privateステートメント』などがあります。この二つについては現時点ではこういうのもあるんだぐらいで覚えて貰えれば問題ありません。

変数名

次に、『変数名』の部分になります。ここが変数を入れておくものの名前になります。上のコードでは『変数』とそのまんま漢字で名前を付けている通り、『漢字、英数字、ひらがな、カタカナ』を使うことができます。ですが、いくつかルールが決まっていますので、記載しておきます。

変数名、命名時の注意

• 使用できる文字は『漢字、英数字、ひらがな、カタカナ』＋『＿（アンダーバー）』
• 記号、スペースは使用できない
• 最初の文字に『数字、＿（アンダーバー）』は使用できない
• 変数の適応範囲で同じ変数名は使用できない
• if,elseなどの予約語は使用できない
• 半角で255文字以内

どれも正直普通に書いていれば引っかかることはないと思いますが、最初の文字に『数字、＿（アンダーバー）』は使用できない、変数の適応範囲で同じ変数名は使用できない、if,elseなどの予約語は使用できない、の3点は比較的ミスしやすいのでより注意しましょう。ちなみに予約語とはステートメント名や関数名など、要はVBA上で既に使われている用語のことです。

型

最後の『型』ですが、ここでは変数にどんなものを入れるかによってそれぞれ変える必要があります。
主に使用する型の種類は以下の通りです。

型の種類

最初のうちは、『Long』、『Single』、『String』、『Variant』さえ覚えておけば問題ありません。ただし、資格取得を目指している方の場合は表に記載した種類については試験問題のマクロで出てきたりするので把握する必要があります。

変数を使う利点

さて、ここまで変数について説明していきましたが、簡単にですが、変数を使う利点を説明します。
変数を使う利点として筆者が特に思っているのが、汎用性の高さです。

凄い簡単な例をあげるとすると、下図左ように日ごとの果物の売上個数を書いたエクセルが合って、これに罫線を入れて表の形にするマクロを作成したとしましょう。（間の日にちについては割愛させてもらっています）

左の表を見る限り最終行は『33』だからそこに合わせればいいと思うかもしれません。ですが、ご存じの通り毎月の日数は毎回31日ではありません。30日の月もありますし、二月は28日です。更に言えば、うるう年の時は29日ですよね。そうなった場合右側の表のように最終行に無駄な空白ができてしまうと思います。そうならない為にどうすればいいでしょうか。

やり方は幾つかありますが、簡単なのを上げると罫線を引くマクロの中に、表の日付が入力されている最終行の位置を取得して変数に入れることです。上の表で言うと、左なら『33』を取得してくれて、右側の表では『32』を取得してくれるようになります。そうすれば、最終行の位置が変わってもピッタリ罫線を引いてくれるようになりますよね。

これはあくまでも一例で変数を使うことで他にも様々な利点がありますが、これだけでも変数を使う利点が少しわかってもらえたのではないでしょうか。

Variant型使用時の注意点

少々話がずれてしまいましたが、型の話に戻りましょう。型の種類の表をみて、これだったら『Variant』だけ覚えればいいのではないかと思う方もいるのではないでしょうか。前述した通り、変数にはそれぞれ入れるものによって『型』を変える必要がありますが、『Variant』であればその必要がありません。

正直、筆者もその気持ちがわかります。楽できるなら楽をしたいですから。ですが、そんな便利な『Variant』ですが、二つほどデメリットがあります。

• マクロの処理速度が遅くなる
• 想定していない動作が起きる可能性がある

マクロの処理速度が遅くなる

例えば、部屋に沢山ある荷物をきちんと整理整頓しておいているのと、何でもかんでも適当にまとめておいている場合、必要なものを探し出すのにどちらが早く見つけられるか考えると、圧倒的に整理整頓してある方が見つけやすいと思います。

それと同じでマクロでも探す分だけ時間がかかってしまうと思ってください。ただ、最近のPCはCPUやメモリの性能が上がったこともあり、ほとんど処理速度の差がないともいわれています。

想定していない動作が起きる可能性がある

簡単な例を上げてみましょう。下のコードを見てください。これはB3セルにデータ1とデータ2に入力した数字の合計を出力するマクロです。

Sub バリアント型()

Dim データ1 As Variant
Dim データ2 As Variant

データ1 = "10"
データ2 = "10"

cells(3,2)= データ1　＋　データ2

End Sub

一見すると問題なさそうに見えますが、これを出力すると以下の通り出力されてしまいます。

このように意図しない出力されてもエラーを吐くことなく処理が進んでしまう可能性があります。エラーにならないことは不具合の発見を難しくさせてしまいます。実際のコードはもっと行数が多いですし、場合によっては複数人で作成している場合もあり、そうなると探し出すのにより多くの労力を使ってしまいます。

きちんと型を宣言すれば、こういった不具合が発生することはなくなります。なので、最初の頃は『Variant型』を使ってマクロを組んでも良いですが、慣れてきたらきちんと型を合わせてマクロを組むように意識してください。

ちなみに上記のマクロは『Variant型』ではなく、数値を格納数型である『Long』などに返ればきちんと望んだ値を出力してくれます。

Sub バリアント型()

Dim データ1 As Long
Dim データ2 As Long

データ1 = "10"
データ2 = "10"

cells(3,2)= データ1　＋　データ2

End Sub

おわりに

今回は以上になります。変数については最初に書いた通り、マクロを組むにあたって絶対に必要になるものです。ですが、これも最初から全て完璧に覚えなきゃいけないわけではありません。わからなかったら都度ネットで調べればいい訳ですし。実際にVBAを触りながら、調べながら試していってもらえればと思います。

次回は変数の逆と言ってもいい定数について説明していきたいと思いますので、興味があれば読んでいただけるとありがたいです。

では、ありがとうございました。