VB6.0用掲示板の過去のログ(No.1)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [過去ログ] [管理用]

投稿日: 2004/02/20(Fri) 21:28
投稿者寝タロ
Eメール
URL
タイトルRe^2: Excelファイルのシート名及びシート数を高速に取得

取得出来るファイルは、

-------------------------------------------------
Excel2000を使って作成したものです。
OSは、Win98SE、Me、XP。全てのOSで取得できます。
シート数は10枚程度でマクロは記載されていません。

私の廻りの環境では全てのパソコンで
シート数、シート名共に取得出来ます。

取得出来ないファイルとは別のファイルですが、
似通っているファイル(シート数、シート名)と
私は思っています。
-------------------------------------------------


取得出来ないファイルは、

-------------------------------------------------
以下の事柄は、すべて同一ファイルの事です。


ファイルはExcel2000を使って作成したものです。
OSは、Win98SE、Me、XP。全てのOSで取得は出来ません。
シート数は10枚程度でマクロは記載されていません。

私の廻りの環境では全てのパソコンで
シート数、シート名共に取得出来ません。
-------------------------------------------------



参照設定でMicrosoft DAO 3.6 Object Library にチェックはしてます。
バージョンは 3.6で間違いありません。

花ちゃんさんの指摘どうり、
FDに入れた状態で同じファイルで試してみたのですが、
シート数、シート名共に取得出来ません。

エラー等が発生しているのは確かで、
デバックモードで追ってみると、

Set DB = OpenDatabase(xlFileName, True, True, "Excel 8.0;")

の行で、エラーが出ています。

ファイルのシートを順番に削除して試してみたのですが
最後の1シートになった状態でも、
シート数、シート名共に取得出来ません。
反対に先程残した、最後の1シートを削除した状態でも、
シート数、シート名共に取得出来ませんでした。


他のファイルとの違いといえば一番最初に作成したという位で、

2回目に作成したファイルは、その次の日に作成して、
シート数、シート名共に取得出来ます。

本当にそのファイルの何が違うのか判りません。


どうして、そこまでそのファイルにこだわるかは、
今、そのファイルが、業務の中心になっているので
内部のリンクが複雑に重なり同じファイルを
もう一度作成するのは無理に近いからです。


宜しくお願いします。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- Web Forum -