VBA技術解説
VBAクラス入門：クラスとは?オブジェクト指向とは?

操作対象の事ですと説明されたりしますが、
まずは何かの物体、つまりは対象物と理解すれば良いでしょう。
ワークシート、セル、グラフ、これらが全てオブジェクトです。

オブジェクト指向とは、オブジェクト同士の相互の作用として、システムの動作をとらえる考え方であり、
対象物を部品を使って組み立てるように表現してプログラミングしていく事になります。
オブジェクト指向における三大要素

このあたりの用語がでてくると、、、
心配はいりません、少なくともVBAでは、継承も多態性も使えないのですから、
（継承としてはインターフェースだけ使えますが、急ぎ覚える必要はないでしょう。）
従って、カプセル化だけを意識すれば良いのです。

カプセル化とは、関連するデータやその操作を一つ（カプセル）にまとめることを言います。
つまり、関連するものを一つのカプセルとしてまとめ、それを使いまわすことになります。
これは概念的なものになりますので、くどくど言葉で説明してもなかなかピンとこないかもしれません。
一番わかりづらいのは、「関連する」というのが抽象的過ぎるということだと思います。
当然、人によって関連の範囲は変わってくることになります。
つまり、人によってクラスの作り方も変わってくるということです。
「自分に関連する人物」というクラスを作るとして、まずデータとしては、
家族、友人、仕事の同僚、学校の同級生、近所の住人・・・
どこまでを想像し、どこまでを一つにまとめるかは、人それぞれ違ってきます。
全部を一つにまとめても良いし、それぞれを別々にまとめても良い。
まとめる範囲が違えば、必要な操作も変わってきます。
どれが適切なのかの正解はないことがほとんどです。
実践の中で、自ら模索し決定していくことになります。
また、カプセル化の重要な要素として、「隠蔽」があります。
必要な情報のみ外部に公開し、不必要なものは非公開として隠蔽するのです。
つまり、透明なカプセルではなく、不透明なカプセルを作るということです。
そして、カプセルの中に入れたり、カプセルの中から取り出したりする場合は、
専用の出入り口（これがプロパティ）を作ります。
その出入口は、入り口専用・出口専用にすることもできます。
カプセルの中を操作できないようにしておき、カプセルの中を操作したいときは、
カプセルについているボタンを押して操作（これがメソッド）できるようにします。

オブジェクト指向のプログラムを作るにはクラスが必要です。
といいますか、オブジェクト指向で独自オブジェクトを作るためにクラスが存在しています。
少なくともVBAにおいてクラスを使うときに、
最も意識すべきはカプセル化だと言って良いでしょう。
・関連するデータやその操作を一つにまとめる。
・必要な情報のみ外部に公開し、不必要なものは非公開として隠蔽。
一番勘違いしてほしくないのは、
クラスを使えばカプセル化できるわけではないということです。

クラスを使ってカプセル化したオブジェクトを作るということです。

クラスを使って、オブジェクト指向を目指すと、
「プログラムの強度や凝集度は高まり、結合度は下がる」
これが利点と言われても、まあ大抵の人は「何それ」ってことになるはずです。
そもそもクラスを使用しないと実現できない処理はありません。
結果としての全体動作だけなら、別の手段で実現可能です。
（細部まで完全に同じ動作になるかは別として）
クラスがどうしても必要になる処理としては、
RaiseEventで、自作のイベント処理を作るような場合ですと、クラスが良いのですが、
これとて、他の方法で実装できるものがほとんどになるはずです。
※RaiseEventの説明は割愛します、興味のある方は別途調べて下さい。
つまり、余程大規模なシステムを作る以外では、
無くてはならないものではなく、使えれば便利なものだということです。
逆の言い方をすれば、
クラスが使いこなせるようになると、これほど便利なものはなく、
もし一切クラスを使わずに作れと言われると困ってしまうくらいの存在となります。

以下はMicrosoftサイトでの説明文の抜粋を引用しています。

オブジェクトとクラス

インスタンスについての補足します

短くまとめると、
クラスは型(オブジェクトの設計図)で、型を使って実体化(インスタンス)したものがオブジェクトです。
つまり
オブジェクトとは、クラスのインスタンスであるという事になります。

以下では、自動車というクラスを作る場合の例えになります。
自動車クラス

作成したクラスを使う時のVBAの具体的な記述について説明します。
「61.FileSystemObjectの使い方」で出てきた
Dim objFSO As FileSystemObject
Set objFSO = New FileSystemObject
FileSystemObject
これがクラスです。
New FileSystemObject
これでインスタンスが作成され、つまりオブジェクトとして使えるようになります。
そして、objFSOがオブジェクトとして使用可能となります。
定義しただけでは、Dim objFSO As FileSystemObject、これだけでは、オブジェクトとして使用できません。
インスタンスを生成して、初めてオブジェクトとして使用できるようになります。
Dim objFSO As New FileSystemObject
これは、型の定義とインスタンスの生成をまとめて行っている事になります。
一般的な書き方をすると
Dim 変数 As クラス名
Set 変数 = New クラス名
または、
Dim 変数 As New クラス名
同じクラスのオブジェクトは、いくつでも作る事が出来ます。
同じクラスから、複数のインスタンスが生成できます。
Dim 変数1 As New クラス名
Dim 変数2 As New クラス名
変数1と変数2は、同じクラスからインスタンス生成した、別々のオブジェクトです。
自動車というクラスをもとに、
セダンやSUVを作り出すという感じで理解すれば良いでしょう。

いろいろと説明してきましたが、

これらを延々と文章で説明しても、かえって混乱するだけのようにも思えます。
「百聞は一見に如かず、百見は一行にしかず」
とにかく「やってみる」という事も時には重要な事だと思います。
ただし、最低限の知識として、
第12回．エクセルの言葉を理解する（オブジェクト、プロパティ、メソッド） このページくらいは理解していることとして説明をしていきます。
では、いよいよ実際にクラスを作っていきましょう。
クラスを作ると言う事は、オブジェクトを作ると言う事です。
クラス モジュールの挿入

クラス名の変更

プロパティの作成

メソッドの作成

以下は、独自のワークシートを作るクラスです。
クラスモジュールを挿入し、貼り付けて下さい。

Private pSheet As Worksheet '扱うシートを設定 Public Property Set MySheet(argSheet As Worksheet) 　　Set pSheet = argSheet End Property '扱うシートを取得 Public Property Get MySheet() As Worksheet 　　Set MySheet = pSheet End Property 'シート名を変更 Public Property Let Name(ByVal argName As String) 　　MySheet.Name = argName End Property 'シート名を取得 Public Property Get Name() As String 　　Name = MySheet.Name End Property 'セル範囲を(開始セル,行数,列数)で指定できるようにする Public Property Get MyRange(sRange As Range, ByVal RowSize As Long, ByVal ColumnSize As Long) As Range 　　Set MyRange = sRange.Resize(RowSize, ColumnSize) End Property 'セルを(行位置,列位置)で指定できるようにする Public Property Get MyCells(ByVal RowIndex As Long, ByVal ColumnIndex As Long) As Range 　　Set MyCells = MySheet.Cells(RowIndex, ColumnIndex) End Property '指定セルのアクティブセル領域に罫線を引く Public Sub CurrentBorders(sRange As Range) 　　sRange.CurrentRegion.Borders.LineStyle = xlContinuous End Sub

MySheet

Name

MyRange

MyCells

CurrentBorders

標準プロシージャーで上のクラスを使う場合です。

Dim myClass As New Class1 Set myClass.MySheet = ActiveSheet With myClass 　　.Name = "クラスTEST" 　　.MyCells(2, 1) = 1 　　.MyRange(.MyCells(3, 1), 1, 3) = 10 　　.CurrentBorders sRange:=.MyCells(2, 1) End With

最初は遊びがてら、上記のコードをいじってみるところから初めてみると良いと思います。
いきなり書籍やWEBで、しっかりクラスを理解しようとしてもかなりの苦労が待ち受けているだけだと思います。
標準モジュールでも簡単に実現できるような簡易なコードから使い始めれば良いでしょう。
ただし既に書いている通り、クラスは無くてはならないものではありませんので、
VBAの基本及び応用において、一通り習得できた後にチャレンジしてみるくらいで十分です。
以下はクラスに関する解説およびクラスのVBAサンプルです。
VBAクラスの作り方：列名の入力支援と列移動対応 VBAクラスの作り方：列名のプロパティを自動作成する VBAクラスの作り方：独自Rangeっぽいものを作ってみた クラスを使って他ブックのイベントを補足する クラスとイベントとマルチプロセス並列処理 クラスとCallByNameとポリモーフィズム(多態性) オートフィルタを退避回復するVBAクラス オートフィルタ退避回復クラスを複数シート対応させるVBAクラス コレクション（Collection）の並べ替え（Sort）に対応するクラス VBAクラスのAttributeについて（既定メンバーとFor…Each）

同じテーマの記事
新着記事
アクセスランク