Dim objWord As Object
Set objWord = CreateObject("Word.Application")
また、次のようにアプリケーションのバージョンを明示させることもできます。
Dim objWord As Object
Set objWord = CreateObject("Word.Application.9")
要するに、表1にしたがってCreateObject関数にオートメーションサーバーを指定すれば、Officeアプリケーションを自由にリモートコントロールできるわけです。
表1:オートメーションサーバーのアプリケーション名とオブジェクトの種類 | ||
アプリケーション | オブジェクトの種類 | クラス |
Excel | Application | Excel.Application |
Sheet | Excel.Sheet | |
Chart | Excel.Chart | |
Word | Application | Word.Application |
Access | Application | Access.Application |
PowerPoint | Application | PowerPoint.Application |
Outlook | Application | Outlook.Application |
確かに、CreateObject関数を使ったこのステートメントは、非常に“汎用的”な方法です。しかし、非効率的な方法とも言えます。それではここで、この「汎用性」と「効率性」に話を移しましょう。