投稿日 | : 2003/09/25(Thu) 18:47 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re9: ファイルリストからExclを開く |
> > この部分はどのように変更したのですか?
> すみません、抜けていました。下記のようにです。
> Set xlBook = xlApp.Workbooks.Open(Dir1.Path & " \ " & File2)
イミディエイトウインドウにはどのように表示されましたか?
C:\My Documents \ Book1.xls このように表示していませんか?
これではエラーが出てExcelが表示されないでしょう。
Dir1.Path & "\" & File2 でないと
正しく動作するまで On Error Resume Next は削除しておきましょう。
ちなみに File2 は変数名ですか? File2.FileName ですか?
もう一度正しいコードをすべて(途中省略せずに)投稿して下さい。
(コピー&ペーストで)