【Excel VBA WScript】この一文の意味をお教えいただけませんでしょうか

Question

いつも本当に有難うございます。

ExcelVBA初心者です。

① Set wdApp = CreateObject("Word.Application.8")

②Set objWshShell = WScript.CreateObject("WScript.Shell")

このようなオブジェクト変数に格納する一文を見たとき、
どのように考えればいいのでしょうか。

この一文は一体何をどのように命令しているのか、と思って、
躓いております...

そういうものだ、という理解の仕方ができず、自分でもいちいち躓いて恥ずかしいのですが、やはり理解したいと思い、質問させていただきます。

お手数おかけしますが、よろしくお願いいたします。

Answer 1

CreateObjectはCOMという方法に則って作られたオブジェクトを作成します。

実際には"WScript.Shell"といった名前や対応するDLL/EXEのパスはレジストリに登録されていて、
この名前のオブジェクトを作成して、とWindowsにお願いすればWindowsはレジストリを調べて
DLLを読み込み(EXEを実行し)、その中に実装されているCOMの決まった方法を呼び出して
オブジェクトを作成してくれます。
オブジェクトとは返ってきた変数を通してやり取りできます。

WordなどEXEの場合別プロセスで実行されますが、オブジェクトに対する呼び出しは
自動的にプロセス間通信に変換してくれるので単純な呼び出しなのか通信を伴うのかを
意識せずにやり取りができます。

Comments

[alice]

分かりやすく説明くださり、有難うございます。
そういう仕組みになっていたんですね、感動です。
オブジェクトは鋳型にちかいものだと思いました。その鋳型を決めるのがCOMのなかにあるものだと認識しました。
丁寧にご教示くださり、誠にありがとうございます。
今後ともよろしくお願いします。

Answer 2

①：さっさと、OFFICE2000以後で有効な構文に書き換えないと。
バージョン指定が有効だったのは、OFFICE 95 / 97 辺りまで。
②：ええええ？こんな事しなければ、出来ない処理系って古すぎ、
まずは、バージョンアップの可能性調査、ダメならＥＸＣＥＬ－ＤＮＡ
⇒ＶＢＡや元になったＶＢ６は、１９９８年リリースです。
ＯＦＦＩＣＥ－９５：ＶＢＡ５．０
ＯＦＦＩＣＥ－９７：ＶＢＡ６．０
だったはず。
ＶＢ６は、ＶＢ系列の一つの到達点、
以後ＶＢ．ＮＥＴ系へ移行、ＶＢ６系が生き残っているのは、ＯＦＦＩＣＥ系
ＥＸＣＥＬ－ＤＮＡを使えば、．ＮＥＴ系が使用可能となります。
あえて、ＶＢＡを使う意味は、共通プラットフォームとして、使用可能という点のみ。
さっさと、ＶＳ２０ＸＸへ移行すべき
’
ＥＸＣＥＬ＆ＶＢＡ 縛り（≒ＯＦＦＩＣＥのみが許されて、アプリインストールが許されない）
ならば、アリかも。
⇒ＭＤＡＣ経由でＡＤＯから、ＤＢも使えるし、共通プラットフォームとしては、
ＭＳ－ＯＦＦＩＣＥ環境として、機能します。
’
＞この一文は一体何をどのように命令しているのか、と思って、
＞躓いております...
本筋は、こっちだったようで。
①：MS-WORD 8 を起動したつもりになっているだけ、OFFICE2000以後、無効
事前バインディング、実行時バインディングの使い分けを考えた方がマシ。
Microsoft Office アプリケーションを他の Office アプリケーションから制御する方法
https://msdn.microsoft.com/ja-jp/library/cc342837.aspx?f=255&MSPPError=-2147217396
②：この先が問題、これだけだと、意味不明

Comments

[alice]

ご回答、有難うございます。
バージョンについては何の知識もありませんでしたので、とても参考になりました。
調べてみたところ、Excel－DNAについてはxll形式のExcel拡張を行うライブラリということで間違いないでしょうか。
なんとなくの認識でお恥ずかしい限りですが、自作関数を効率的に作成するために役立つツールというように思っております。

②
Set objWshShell = WScript.CreateObject("WScript.Shell")
If Err.Number <> 0 Then
WScript.Echo "エラー: " & Err.Description
Set objWshShell = Nothing
WScript.Quit
End If
というような式です...
本音を言うと、こちらも本当に理解できているのか...
とくに【Set objWshShell = Nothing】がいまひとつわかっておりません...

ご回答くださり、有難うございます。なんだか質問に次ぐ質問のようなかたちになってしまってすみません...勿論スルーしていただいても大丈夫です

[daive]

①の方法は、結局現在有効な、WORDが起動するだけです。
　EXCELは複数バージョンのインストール、起動が許されています。
　EXCEL以外でインストール可能な物は、複数バージョン起動時に、修復機能が動作後、
　正常起動します。（WORD/ACCESSなど）、
　OutLookは複数バージョンインストール不可。
　EXCELでは、最終にパッチが行われたり、修復が行われたものが、
　CreateObject　を使った場合に起動します。
　Word／Access/EXCELの特定バージョンを起動する場合は、
　レジストリ解析をするか、ショートカットから起動するか、
　C:\Program Files (x86) , C:\Program Files を解析するかになります。

②は、WScript で、Shellを起動して、解放してしまっているので、
　何をしているか？⇒Shellを起動後、終了するだけ。何もしていません。
　検索ワード：CreateObject("WScript
　辺りで、検索したり、以下のサイトから、検索ワードを拾ったり。
　WScriptオブジェクトの詳細（1） (2/3)
　http://www.atmarkit.co.jp/ait/articles/0403/11/news095_2.html
してみてください。

[alice]

①承知いたしました。有難うございます。
②拝見します。
　そういうことだったんですね、よく分かりました。
　とても勉強になります。
　お付き合いいただき、本当に有難うございます。