投稿日 | : 2006/01/31(Tue) 17:35 |
投稿者 | : ねずみ |
URL | : |
タイトル | : 他のパソコンにインストールすると読み込まない |
はじめまして、たびたび利用させていただいており、いつも助かっております。
どうしてもわからないのでここで質問させてください。
こちらのmsflexgridからexcelを読み込むを参考にさせて頂き。
Dim DB As DAO.Database
Dim RS As DAO.Recordset
Dim FileName As String
FileName = "D:\TEST\program\ame10\amedas10.xls"
Set DB = OpenDatabase(FileName, True, True, "Excel 8.0;HDR=YES;IMEX=1;")
Set RS = DB.OpenRecordset("Sheet10$", dbOpenTable)
Set Data1.Recordset = RS
Data1.Refresh
RS.Close
DB.Close
Set DB = Nothing
Set RS = Nothing
:
と記述してディストリビューションウイザードでパッケージを作成し、
他のパソコン(OSは作成のパソコンと同じWinXPです)にインストール
したのですが、MsflexGridには何も表示されないのです。
エクセルファイルやシートの名前を変えるとエラーがでますので読みには行っています。
また、作成したパソコンではちゃんと表示されます。VBは6.0です。
どなたかこの現象についてお分かりの方、教えていただけると助かります。
よろしくお願いします。