[[20180502114007]]　『別のファイルのシート名をリンク形式で目次化する』（KYOMISA）　ページの最後に飛ぶ

『別のファイルのシート名をリンク形式で目次化するVBAについて』（KYOMISA）

お世話になっております。

1.やりたい事
　1)ファイル(ブック）：A,B,C,D,E 等(5つ以上のファイル）が存在します。
　2)各ファイルに10以上のシートが存在します（各シートとも複雑な計算式が

    入っています）。
　3)各ファイルの各シート名の目次をリンク形式で一つのファイル
   （新たなブック）に作成したい次第です。

2.試した事

  インターネットで検索し、以下のVBAを試した結果、目次はできるのですが
  リンク形式になりません。

Sub aa()

 Dim i As Long, wb As Worksheet
 Workbooks.Open Filename:="C:\test0502\20180502aa.xlsm"
  i = 1
  For Each wb In ActiveWorkbook.Worksheets
     ThisWorkbook.Worksheets("Sheet1").Range("A" & i).Value = wb.Name
    i = i + 1
  Next
End Sub

3.教えていただきたこと
　リンク形式するために、VBAをどのように書き換えればよいか教えてくださ

  い。

よろしくお願いします。

＜使用 Excel：Excel2013、使用 OS：Windows10 ＞

その参考なしたサイトでは、この記述でハイパーリンクになると記載されてたのですか？
この記述内容をヘルプなどで確認しましたか？
（通りすがり） 2018/05/02(水) 12:15

ハイパーリンクにかんしては、マクロの自動記述が参考になると思います。ヘルプやネット検索でもいくらでも出てくると思います。
（通りすがり） 2018/05/02(水) 12:17

参考にしたサイトには、パイパーリンクになるとは書かれていませんでした。
ハイパーリンクについて更に調べます。
ありがとうございました。
（KYOMISA） 2018/05/02(水) 13:22

コメント返信：

[ 一覧(最新更新順) ]

[[20180502114007]] 『別のファイルのシート名をリンク形式で目次化する』（KYOMISA） ページの最後に飛ぶ

[[20180502114007]]　『別のファイルのシート名をリンク形式で目次化する』（KYOMISA）　ページの最後に飛ぶ