|
>なるほど、ようやく話が分かりました。
>IEで直接エクセル形式のファイルを開くということですね。
そのとおりです。
説明がわかりにくくてすみませんでした。
>
>ただこの場合、
>> Workbooks.Add
>これはできないと思います。
できないんですか。。。
>そもそもこれは
> Application.Workbooks.Add
>のApplicationを省いたものでApplicationが”EXCEL”の場合には
>有効ですが、Applicationが”InternetExplorer”の場合は、
>”InternetExplorer”がWorkbooks.Addに対応していない限り無効になるのでは?
>
>なので、回避策として
>未使用のBook1.xlsをあらかじめ用意して
>
>Private Sub Workbook_Open()
> Dim ieo As Object
> Set ieo = CreateObject("InternetExplorer.application")
> ieo.Visible = True
> ieo.Navigate "Http://・・・・・/Book1.xls"
>End Sub
>
>という方法ではどうでしょうか?
今回、Bookの数が可変のため、あらかじめブックを用意することができないため、
この方法が使えないような気がします。
せっかく教えていただいたのに申し訳ありません。
>
>
>どうしても新規ブックが必要ということであれば、私にはできそうもないので
>詳細を明記して、新しくスレを立ててください。
>何かやり方があるかもしれません。
現在他の作業に追われているため、時間が空き次第新しいスレを立てさせてもらいます。
とりあえず解決にさせていただきます。
ありがとうございました。
|
|