Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


44132 / 76732 ←次へ | 前へ→

【37622】Re:strURLをオープンした後に取り込むには
回答  ハチ  - 06/5/13(土) 1:42 -

引用なし
パスワード
   ▼タクヤ さん:
>▼ハチ さん:
>ありがとうございます。
>そのように行ったところ今度は
>
>実行エラー438
>オブジェクトはこのプロパティまたはソメッドをサポートしていません。
>
>がでました。
>やはりエクセルの2000と2003だから取り込めないのでしょうか?
>

strURL = "http://www.stat.go.jp/data/getujidb/zuhyou/c01-1.xls"
Workbooks.Open strURL
Workbooks("c01-1.xls").Sheets(1).Range("A1:R21").Copy _
ThisWorkbook.Sheets(1).Range("A1")

これでいけました。
ダウンロードしたbookにはSheets("a01")ってありませんでしたが。

0 hits

【37615】strURLをオープンした後に取り込むには タクヤ 06/5/13(土) 0:31 質問
【37616】Re:strURLをオープンした後に取り込むには ハチ 06/5/13(土) 0:41 発言
【37617】Re:strURLをオープンした後に取り込むには タクヤ 06/5/13(土) 1:12 質問
【37618】Re:strURLをオープンした後に取り込むには inoue 06/5/13(土) 1:24 発言
【37621】Re:strURLをオープンした後に取り込むには ハチ 06/5/13(土) 1:33 発言
【37622】Re:strURLをオープンした後に取り込むには ハチ 06/5/13(土) 1:42 回答
【37623】Re:strURLをオープンした後に取り込むには タクヤ 06/5/13(土) 1:54 お礼

44132 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free