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

投稿日: 2006/05/05(Fri) 02:17
投稿者NM
Eメール
URL
タイトル「DLL読み込み時のエラーです。」に関して

いつもお世話になっております。
エクセルにデータ保存しようとした際に「DLL読み込み時のエラーです。(Error 48)」
が出ました。

実際のコードとして、
Private Function xlFileSave(FileName As String, FullPath As String) As String
    Dim xlApp       As excel.Application
    Dim xlBook      As excel.Workbook
    Dim xlSheet     As excel.Worksheet

     '新規ファイルの「Sheet1」に書き込む準備
    Set xlApp = CreateObject("Excel.Application")
    Set xlBook = xlApp.Workbooks.Add
    Set xlSheet = xlBook.Sheets(1)
  以下省略
において、「Set xlApp = CreateObject("Excel.Application")」を実行した
タイミングでエラーが発生します。

プログラムを作成したPC環境としては、
・Windows XP Professional Edition (VB6.0)
・Microsoft Office 2003 Professional Edition
・参照可能なライブラリファイルはMicrosoft Excel 11.0 Object Library

出来上がったプログラムを実行して、上記問題が発生したPC環境は、
・Windows Server 2003
・Microsoft Office 2003 Personal Edition
・参照可能なライブラリファイルはMicrosoft Excel 11.0 Object Library

また、下記の環境で試した際には、問題なく動作しました。
・Windows Server 2000
・Microsoft Office 2003 Personal Edition
・参照可能なライブラリファイルはMicrosoft Excel 10.0 Object Library

「DLL読み込み時のエラーです。(Error 48)」のヘルプでは、
・DLLが存在しない
・名前の衝突
・DLLの形式が正しくない
などに関する記載がありますが、CreateObject関数を使用した際に、
参照するDLLファイルとは何でしょうか。
もしくは、どのような調べ方があるのでしょうか。
ご存知の方、ご教授ください。よろしくお願いします。


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

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

- VBレスキュー(花ちゃん) - - Web Forum -