vbからエクセルファイルを開くには？

SH 2007-03-14 03:10:11 No: 135749

早速ですが、質問させていただきます。
Accessでエクセルを操作しようとしています。
ファイルを開こうとする時、
Set xlAppli= CreateObject("Excel.Application")
この部分で「書込みが出来ません。」というエラーが起こってしまいます。
エクセルファイルが開かれている訳ではなく、タスクマネージャーのプロセスの部分にも表示されていません。
どうしてこのようなエラーが出てしまうのでしょうか。どなたか分かる方、教えてください。説明が分かり辛かったらすみません。よろしくお願いします。

VBレスキュー(花ちゃん) 2007-03-14 16:31:28 No: 135750

それだけの情報では、何とも言えませんので、Excelのバージョン等を含めた環境や
バージョン・参照設定の情報等を明記して下さい。

又、事象を再現できる最低限のコードを提起して下さい。
(正確なエラーメッセージを含む)

SH 2007-03-14 18:16:21 No: 135751

早速のご返事ありがとうございます。
説明不足ですみません。
Excelのバージョン：2002
VB：6.0
参照設定：Visual Basic For Applications,Microsoft Excel 10.0 Object Library,OLE Automation,Microsoft Office 10.0 Object Library

以下、コードです。
'  Excel の起動処理
   Dim App   As Excel.Application
   Dim Book As Excel.Workbook
   Dim Sheet As Excel.Worksheet

   Set App = CreateObject("Excel.Application")  '←ここでエラー
   Set Book = App.Workbooks.Add
   Set Sheet = Book.Worksheets(1)

エラー内容：実行時エラー '70':
書込みできません。

また、他のPCで確認したところ、このような現象は起こらず、
私のPCでのみこの現象が見られるようです。

説明不足ですみませんでした。お願いします。

matsu 2007-03-16 03:22:45 No: 135752

>Dim App As Excel.Application

Appオブジェクトと同じ名前で宣言しているのが原因だと思います。
ヘルプでAppを検索してみてください。
変数名を変えた場合はどうなりますか？

魔界の仮面弁士 2007-03-16 12:54:59 No: 135753

>>> この部分で「書込みが出来ません。」というエラーが

>> エラー内容：実行時エラー '70':
>> 書込みできません。

メッセージが微妙に異なっているようですが、実際に出ているのは、
どちらのメッセージなのですか? (^^;

>> また、他のPCで確認したところ、このような現象は起こらず、
>> 私のPCでのみこの現象が見られるようです。

・Administrators で実行した場合に発生していますか? (ユーザ権限不足?)
・限定された DCOM 権限になっていませんか? (dcomcnfg.exe など)
・Excel を、既定のインストールのままにするのではなく、たとえば、
全機能をフルインストールしてみても駄目ですか? (アドバタイズの問題?)
・下記の URL などに該当しそうな項目はありませんか?
http://support.microsoft.com/kb/257757/ja

> Appオブジェクト
あれ、そんなオブジェクトありましたっけ?
# Access.Application オブジェクトのことでは無いですよね…

> 同じ名前で宣言しているのが
プロシージャ変数として宣言されていますので、もし、既存の
オブジェクト名と重複していたとしても、エラーにはならない気も。

VBレスキュー(花ちゃん) 2007-03-16 17:07:44 No: 135754

投稿されたコードと最初の質問のコードが違っているようですが？
(投稿されたコードではエラーは発生しませんね）

下記に該当していませんか？
http://support.microsoft.com/kb/257757/ja

>また、他のPCで確認したところ、このような現象は起こらず、
>私のPCでのみこの現象が見られるようです。
この辺の違いを調べて見れば解るかとは、思うのですが。

matsu 2007-03-16 21:28:22 No: 135755

>Excelのバージョン：2002
>VB：6.0

AccessのVBAのバージョンでしたか・・・
勘違いしてました。
すみませんでした。

VBレスキュー(花ちゃん) 2007-03-16 22:22:03 No: 135756

魔界の仮面弁士さんのレスをろくに読まないでレスして一部かぶってしまったようで、すみませんでした。

>AccessのVBAのバージョンでしたか・・・
>勘違いしてました。

VB6.0 で試してもエラーは発生しませんよ。（問題はありますが）