ＩＫＡＣＨＩ指定したシートに、すべてのシートのハイパーリンクを作成するExcelVBAです。 マクロを実行すると、目次シートの名称を入力する入力ボックスが表示されます。 目次シートには、当該Excelブックのすべてのシートへのハイパーリンクが作成されます。 Option Explicit Public Sub 目次シート作成() On Error GoTo Exception Dim strNewSheetNm As String strNewSheetNm = InputBox("目次シートの名前を入力してください。") Dim objNewSheet As Worksheet Set objNewSheet = ThisWorkbook.Worksheets.Add objNewSheet.Name = strNewSheetNm Dim lngRow As Long lngRow = 1 Dim
