[リストへもどる]
一括表示

投稿時間:2004/01/23(Fri) 00:27
投稿者名:ひろ
Eメール:
URL :
タイトル:
Excelファイルをテキストボックスに表示のエラー
VBをはじめたばかりの初心者です。
逆引きHELPの「Excelファイルをテキストボックスに表示」を参考にさせていただいて、
エクセルファイルをリストに表示するプログラムを作りたいのですが、
Set DB = OpenDatabase(xlFileName, False, False, "Excel 8.0;HDR=NO;")の部分で
エラー:ファイルを作成できませんでした。となってしまいます。
考えられるエラーの理由を教えていただけませんでしょうか?

投稿時間:2004/01/23(Fri) 00:51
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: Excelファイルをテキストボックスに表示のエラー
> Set DB = OpenDatabase(xlFileName, False, False, "Excel 8.0;HDR=NO;")の部分で
> エラー:ファイルを作成できませんでした。となってしまいます。

その前の xlFileName = App.Path & "\Sample.xls" ファイルのパスの指定を間違って
いませんか?

xlFileName ="c:\Sample.xls" 等のように使用するExcel用のファイルのパスをフルパスで
指定して見て下さい。

投稿時間:2004/01/23(Fri) 04:09
投稿者名:ひろ
Eメール:
URL :
タイトル:
Re^2: Excelファイルをテキストボックスに表示のエラー
その前の部分は 
xlFileName = "D:\フォルダ名\A-4.xls"
xlSheetName = "list"& "$"

のように表示しています。場所も間違ってませんし、ファイル名も間違っていません。
他の部分はほとんど変えていないのでやはり、ここが間違っているのでしょうか・・・?

投稿時間:2004/01/23(Fri) 07:58
投稿者名:nobu
Eメール:
URL :
タイトル:
Re^3: Excelファイルをテキストボックスに表示のエラー
下記は 「フォルダ名」と言うフォルダ名なのですか?

>  xlFileName = "D:\フォルダ名\A-4.xls"

こう言う場合には省略や手打ちでは無くてソースそのものを
コピーアンドペーストする方が良いですよ。
手打ちでは気の様な投稿時のミスも発生します。

>  xlSheetName = "list"& "$"

xlSheetName = "list" & "$"
                    ~       ここに空白ですね。単に記入ミス?

投稿時間:2004/01/23(Fri) 09:35
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^3: Excelファイルをテキストボックスに表示のエラー
色々試して見たのですが、そのようなエラーが発生しないのですが、正確なエラーはどのように
表示しているのでしょうか?
又、Excelファイルを変更しても同じでしょうか?
参照設定は、何と何に入っているのでしょうか?
使用しているコードも投稿して頂けませんか?


# ★ - Excelのプレビュー - ひろ 01/22-19:43 No.7604 New と同じ方でしょうか?
違う方なら 貴方が後になりますので、お名前を変更して下さい。

投稿時間:2004/01/24(Sat) 00:42
投稿者名:おか
Eメール:
URL :
タイトル:
Re^4: Excelファイルをテキストボックスに表示のエラー
すみません・・ひろあらため、おかです。
nobuさんのご指摘のようにファイル名のちょっとした間違いでした。
全角半角が違っていただけでした。これからはファイル名をコピーペーストするようにします。
勉強になりました。色々お騒がせしてしまってすみませんでした。m(_ _)m