外部サーバにあるＰＤＦファイルをダウンロードさせる方法

質問

ハイパーリンクにて、外部サーバー上のＰＤＦファイルをＩＥで表示できるようにしてあるエクセルシートがあります。

このＰＤＦファイルを定期的に自分のＰＣに別名（その日の日付）で保存してるのですが、
ハイパーリンク先が何十個もあり、毎回手動でおこなうのが面倒なので自動化したいのですが、
どうにも上手くいきません。

ExcelVBAにて、サーバにあるＰＤＦファイルをダウンロードさせる方法はございますでしょうか。

別のカテゴリーで質問済みなのですが、どうやらこちらの方が適切そうなので再質問致しました。

どなたかご教授お願いします。

回答No.2

yyr446 · ベストアンサー

ＩＥで表示する必要が無いなら
VBでPDFを扱えるようです。
↓が参考になりそうです
http://pdf-file.jugem.jp/

お礼

助かりました!!　いろいろ参考になる箇所があり、なんとか目的を達成できました。

回答No.3

imogasi

自信はない。
Sub test01()
Dim obj As Range
Set obj = ActiveSheet.Range("A1:F30")
Dim hpl As Hyperlink
For Each hpl In obj.Hyperlinks
adr = (hpl.Address)
ActiveWorkbook.FollowHyperlink Address:=adr, NewWindow:=UseNewWindow
Next
End Sub
でエクセル上のハイパーリンクは開くことまでは出来ると思う。
しかしダウンロードとなると、サーバーのファイルをダウンロードする、サーバーサイドのプログラムを動かす必要が出て（CGIのような）、エクセルVBAでは無理ではないですか。
良くわかりませんが。
ーー
IEを動かして、表示画面から内容を採るとかになるのかな。

回答No.1

agharta

これですかね？

あまり、自信はありません。

参考URL：

http://www.ken3.org/cgi-bin/group/vba_ie.asp