• 締切済み

エクセルのマクロ

ハイパーリンクにて、サーバー上のPDFファイルをIEで表示できるようにしてあるエクセルシートがあります。 このPDFファイルを定期的に表示して、自分のPCに別名(その日の日付)で保存してるのですが、 ハイパーリンク先が何十個もあり、毎回手動でおこなうのが面倒なので、マクロを使って自動化したいのですが、 どうにも上手くいきません。 サーバー上のPDFファイルをIEで表示する事は出来たのですが、その後、自分のPCに別名(その日の日付)で 保存する方法が分かりません。 どなたかご教授お願いします。

みんなの回答

  • mt2008
  • ベストアンサー率52% (885/1701)
回答No.3

ANo.1です。 「サーバー」は、LAN上のサーバではなくインターネット上のサーバの事なんですね。 それでしたら、ダウンロードツールの様なものを使った方が楽でしょう。 そっちの分野は詳しくないのでアドバイスは出来かねますが、ファイル名の変更にまで対応したツールもあるのではないでしょうか。

kontade
質問者

お礼

ありがとうございました。別の方法で検討してみます。

回答No.2

まず、一旦 「ツール」の中の「マクロ」で「新しいマクロを登録」を 押してから 一連の作業をやってみて(できれば2つ3つ保存してみて) で 記録は一旦終了させて Alt + F8 でマクロを表示させて「編集」で中身を見てみてください。 それで 何をどうすれば そういった作業をさせられるのかが わかったら 残りのリンク先も追加すればOKだと思います。

kontade
質問者

お礼

ご回答ありがとうございました。でも、ご指示通りでは上手くいきませんでした。

  • mt2008
  • ベストアンサー率52% (885/1701)
回答No.1

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

kontade
質問者

補足

ご回答ありがとうございます。確かに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"』としても駄目でした。 再度、ご教授頂けると幸いです。

関連するQ&A