• ベストアンサー

excel ハイパーリンク マクロ

excelのA1からA10の各セルの中に自分のPCの中のあるファイルのアドレスが入っているものとします。 そのときマクロを動かすことでそれをハイパーリンクに変えるにはどんなマクロを書けばいいでしょうか。 いちいち手で張るのはめんどうなことと、ときどきリンクが壊れることがあってマクロで一発でやりたいのです。

  • taktta
  • お礼率72% (1031/1430)

質問者が選んだベストアンサー

  • ベストアンサー
  • D______S
  • ベストアンサー率40% (6/15)
回答No.1

こんな感じですか? A1からA10に記載されたアドレスをハイパーリンク化するマクロ (セルが空白の場合は、ハイパーリンク化しない) Sub Macro1() For i = 1 To 10 Step 1 Cells(i, 1).Select If (Trim(Cells(i, 1).Value) <> "") Then ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _ Cells(i, 1).Value End If Next i End Sub

その他の回答 (1)

回答No.2

A列のファイルアドレスを書き換える可能性があるということでしょうか? ワークシート関数で隣のセルに =HYPERLINK(A1,"ファイル○×を開く") とする方法もあります。 A列のアドレスの張り替えだけで、ハイパーリンクの再設定は必要ありません。

関連するQ&A

  • エクセルのハイパーリンクとマクロが使えなくなる・・

    職場で同じエクセルファイルを2台の別々のPCで使用しています。それぞれのPCが共有ネットワークにつながっていないので、どちらかのPCでそのファイルに変更があり更新されると、その都度USBに入れてもう一台のPCにファイルを上書きをするという作業をしています。その際、そのファイル内で張ってあるハイパーリンクとマクロが無効になる(具体的にはエラーが出てリンクやマクロが解除されてしまう)ことがあり困っています。原因と対策がわかれば教えていただけると助かります。

  • エクセル・ハイパーリンク

    エクセルのハイパーリンクについて質問です。 ハイパーリンクでリンク先を 例)c:\Program Files\office とリンクさせたいとき、エクセルのA1のセルにProgram Files、B1のセルにofficeと書いてそれを参照し、c:\A1\B1 のような感じでできる方法はないのでしょうか? またVBA等でマクロを組んで似たようなものを作る事はできるのでしょうか? 稚拙な文章で申し訳ないですがよろしくお願いします。

  • エクセルでハイパーリンクを連続的に設定する方法(マクロをなるべくなら使わない方法)

    エクセルでハイパーリンクを設定し、PDFファイルが開くように設定するのですが、   エクセルのセル   リンク先   A0001     ⇒ \ディレクトリ\A0001.pdf   A0002     ⇒ \ディレクトリ\A0002.pdf   ・・・ というようになっているので、一つ一つリンク先を入力しないで、自動で連続的にリンク先を設定することはできるでしょうか? マクロを使ったことがないので、マクロを使ってしかできない場合は、その方法を教えてください!!!! Windows2000/Office2000 使用

  • エクセル ハイパーリンクについて

    エクセル ハイパーリンクの設定について教えてください。 Excel のハイパーリンクで「(1)このBook(ファイル)の、(2)このSheetの、(3)このセルに」リンクするという 設定方法は分かるのですが、(3)のこのセルに、という部分で「この文字が入力されているセルに」リンク という細かい設定は出来るのでしょうか? 例) A1をクリックすると、別ファイル別シートの「確認」という文字列が入力されているセルにリンクする。 該当のセルが複数ある場合はどのセルでもOK。(出来れば一番上にあるセルがベストですが) 色んな書籍を漁ってみたのですが、とうとう分かりませんでした。 エクセルに詳しい方、どうか宜しくお願い致します。

  • Excel で ハイパーリンクを付けない

    Excel 2007 ( 97-2003 ワークシートで保存) セルの中にメールアドレスをコピーして貼り付けるとハイパーリンクが付きます。(青・下線) このリンクからメールをする事はありません。 以前は、リンクにならななかった気がしたのですが、 確かUSBメモリでデータを行き来していたら付くようになっていたようです。 貼り付けてからハイパーリンクの削除で消していますが、 それも面倒です。 貼り付け時に最初からテキスト状態になる様な方法をお願いします。

  • エクセルマクロによるハイパーリンクの方法

    はじめて投稿します。 エクセルマクロを始めたばかりですが、よろしくお願いします。 Fileフォルダ内にマクロ.xlsとdataフォルダがあり、 dataフォルダ内には複数のPDFファイルがあります。 マクロ.xlsのセルA1~A10に適当な英数字の文字列(例えばA123,B243,C072…など)が書かれていて dataフォルダ内にはセルA1~A10に書かれている文字列に少し文字が追加された名前のPDFファイル (例えばセルの文字列が"A123"なら"A123(OK).pdf")があります。 これをマクロを使ってA1~A10の文字列にハイパーリンクさせて、 セルに書かれている文字列をクリックして開きたいのですがどうすればよいでしょうか? A1~A10に書かれている文字列を変数cellnameに代入し、 PDFファイルをcellnameにワイルドカードを使って変数pdfnameに代入できずにつまずいています…。 どなたかご解答の程宜しくお願いいたします。

  • ハイパーリンクのマクロ起動?

    エクセル上のA1セルにBeckyメールへのハイパーリンクを設定しているのですがこのセルをクリックせずマクロでメール起動出来ませんか?

  • ハイパーリンク設定をマクロに記録したい(エクセル2000)

    フォルダ内のファイルの一覧をエクセルで作り、目次のようにハイパーリンクでジャンプするようにします。1フォルダ、1シートとします。 エクセルの文字列を選択して、ハイパーリンク設定画面で、リンク先のフォルダを指定するところまでをマクロに記録し、ショートカットキーに登録して作業を早くしたいのです。 ところが、リンク設定が完了するまでマクロ記録の終了ができません。フォルダ指定までのマクロでないと他の文字列に使えません。 リンク設定の途中でマクロ記録を終了する方法はないでしょうか?

  • エクセルでのハイパーリンク切れについて

    エクセルの表の中にハイパーリンクで他のファイルを何十個もリンクしていたのですが、そのファイル群を別の場所に移動したら、リンク切れしてしまいました。 相対パスでリンクされていたからだと原因は分かったのですが、いちいち何十個のファイルをリンクし直すのは大変手間がかかります。これを簡単に変更するやり方はあるのでしょうか?

  • エクセルに掛けたハイパーリンクについて

    例えば、Aがエクセル表を作成して、ハイパーリンクをかけたとします。 そのハイパーリンクは、Aの画像であったり、関連する文書であったり、そのエクセル表の入っている同じフォルダのものです。 このエクセル表だけをメールでBに送った場合、それを受け取ったBはハイパーリンクのかかっているセルをクリックしたとしたらパソコン画面に画像とか、関連する文書とかを表示することはできますか? やはり、Aは、Bに関連する画像、文書の入ってるファイル(フォルダごと)も一緒に送信しないと開けないのでしょうか? そもそも画像のアドレス設定がAのパソコンのファイルの住所設定になっているのでBは、開けないのでしょうか? 私の言ってること伝わったでしょうか?教えてください。お願いします。

専門家に質問してみよう