- 締切済み
エクセルのマクロ
ハイパーリンクにて、サーバー上のPDFファイルをIEで表示できるようにしてあるエクセルシートがあります。 このPDFファイルを定期的に表示して、自分のPCに別名(その日の日付)で保存してるのですが、 ハイパーリンク先が何十個もあり、毎回手動でおこなうのが面倒なので、マクロを使って自動化したいのですが、 どうにも上手くいきません。 サーバー上のPDFファイルをIEで表示する事は出来たのですが、その後、自分のPCに別名(その日の日付)で 保存する方法が分かりません。 どなたかご教授お願いします。
- みんなの回答 (3)
- 専門家の回答
みんなの回答
- mt2008
- ベストアンサー率52% (885/1701)
ANo.1です。 「サーバー」は、LAN上のサーバではなくインターネット上のサーバの事なんですね。 それでしたら、ダウンロードツールの様なものを使った方が楽でしょう。 そっちの分野は詳しくないのでアドバイスは出来かねますが、ファイル名の変更にまで対応したツールもあるのではないでしょうか。
- ookami1969
- ベストアンサー率14% (137/953)
まず、一旦 「ツール」の中の「マクロ」で「新しいマクロを登録」を 押してから 一連の作業をやってみて(できれば2つ3つ保存してみて) で 記録は一旦終了させて Alt + F8 でマクロを表示させて「編集」で中身を見てみてください。 それで 何をどうすれば そういった作業をさせられるのかが わかったら 残りのリンク先も追加すればOKだと思います。
お礼
ご回答ありがとうございました。でも、ご指示通りでは上手くいきませんでした。
- mt2008
- ベストアンサー率52% (885/1701)
PDFをコピーするのに、IEで開く必要は無いのでは? 単に↓の様にファイルコピーしてはいかがですか? Sub sample() Dim sMotofile As String Dim sSakiFile As String sMotofile = "\\192.168.1.1\hogehoeg\Copyしたい.pdf" sSakiFile = "C:\自分のPC" & Format(Now(), "YYYYMMDDhhmmss") & ".pdf" FileCopy sMotofile, sSakiFile End Sub
補足
ご回答ありがとうございます。確かにIEで開く必要は無いですね。 教えていただいたサンプルを元に試してみたのですが、サーバー上のPFDを上手くコピーできないようです。 (自分のPCから自分のPCへのコピーは上手くいきました) 恐らくパスの指定が間違ってるんでしょうが、基本的な知識がないのものでよく分かりません・・・。 エクセルのハイパーリンクは、『http://www.サーバー.com/xxx/xxxx/Copyしたい.pdf』としてあるのでが、この場合の パス指定はどうすればいいのでしょうか? ちなみに、私が試したパス指定は『"http://www.サーバー.com/xxx/xxxx/Copyしたい.pdf"』です。それと、サーバーの グローバルアドレスを確認して、『"\\202.xxx.xxx.xx\xxx\xxxx\Copyしたい.pdf"』としても駄目でした。 再度、ご教授頂けると幸いです。
お礼
ありがとうございました。別の方法で検討してみます。