CreateObjectを使わない方法

質問

http://officetanaka.net/excel/vba/tips/tips61.htm
のコードを実行したいのですが、

Set WD = CreateObject("Word.Application")

を通り過ぎる時に、3秒くらい時間がかかります。
（パソコンが古いからかも知れませんが）

なのでもう一つの方法（CreateObjectを使わない方法）
でこのマクロを実行したいのですが
どういう方法か忘れてしまいました。

参照設定の「Microsoft　Word　11.0　Object　Library」にチェックをしたのですが、
どういうコードを書けばいいんでしたっけ？

CreateObjectを使う方法と、今質問している方法と
どちらが早く処理できるかを比べたいと思います。

よろしくお願いします。

回答No.2

DexMachina · ベストアンサー

> 参照設定の「Microsoft　Word　11.0　Object　Library」にチェックをした

でしたら、以下のように、キーワード「New」を使用してやればOkです。

Set WD = New Word.Application

Excelで同様の比較をしたことがありますが、体感速度で明確な差があったと
記憶しています。
(但し、具体的な数値までは取っていなかったかも・・・(汗))

お礼

ありがとうございます。試してみます。

回答No.1

xls88

shell関数で
ret = shell("WINWORD.exe", 1)

下記で、Wordが開いていない場合に、Wordが起動されます。
Application.ActivateMicrosoftApp xlMicrosoftWord

お礼

いろんなやり方があるのですね。ありがとうございます。参考になりました。