すみません。とても困っていてみなさまのお力をお貸し願えませんでしょうか？
今、VB6でシートを読み込むプログラムを作っています。
ブックをオープンしたいのですが、読込み用のダイアログボックスで指定したExcelファイルを
オープンする場合どのようにしたら良いのでしょうか？
読込み用ダイアログボックスの処理（FileListは標準モジュールで宣言しています。）
FileList = DirSelect.Path & "\" & FileSelect.List(FileSelect.ListIndex)
ブック読込みプログラム
xlApp.Workbooks.Open " & FileList & "
とやったのですが、ファイルが開けませんとエラーが出てしまいます。
どのように記述すれば、良いのでしょうか？お願いいたします。
私がやっている方法を記します
Dim exl As Object ' オブジェクト変数
Dim sExcelPath As String ' Excelファイルのパス
' Excel起動
Set exl = CreateObject("Excel.Application")
ExcelOpen = True
sExcelPath = "ここに開きたいExcelファイルのフルパスを入れてください。他から値を取得してきてももちろんかまいません"
With exl
' ExcelFile オープン処理
.Application.Visible = False
.Application.Workbooks.Open FileName:=sExcelPath
End With
ちなみに、"Visible"を"True"にすれば、
実際に開いているかどうかを見て確認することもできます。
これで出来ると思うのですが。