|
小僧さん、ご教授くださいましてありがとうございます!!
↓こういうことでしょうか。。
strPass = "C:\Program Files\Microsoft Office\Office\Excel.Exe" / regserver
Shell strPass, 1
Set xlApp = CreateObject("Excel.Application.9")
xlApp.Workbooks.Add
xlApp.Visible = True ' アプリケーションを表示する場合は、Visible プロパティに True を設定します。
Set MyDB = CurrentDb
実行してみると「型が一致しません。」とのエラーが表示されます。
VBAの記載方法が違いますか・・?(;_;)
▼小僧 さん:
>▼yuki さん:
>こんにちは。
>
>複数のバージョンの Office がインストールされている場合の
>Office オートメーションについて
>
>h tp://support.microsoft.com/kb/292491/ja
>
>この辺に問題がありそうですね。
>
>またそのページのリンク先に
>
>
>>Office OLE オブジェクトを別のプログラムに挿入する
>>
>> 1台のコンピュータに複数のバージョンの Office をインストールした場合、
>> Office オブジェクトを別のプログラムに挿入する
>> (たとえば、Excel ワークシート オブジェクトを Word 文書に挿入する) と、
>> 最新のバージョンのプログラムが使用されます。
>
>なんて記述も見られます。
>
>あまり良いとは思いませんが、
>
>"C:\Program Files\Microsoft Office\Office\Excel.Exe" /regserver
>
>と Shellステートメント実行後に
>OLE処理を行うとうまくいくかもしれませんね。
>
>(Officeの混在環境がないため、当方未検証です。)
|
|