2017-11-21 2 views
0

Excelマクロが使用可能なワークシートが送信されました。このシートには50枚以上が含まれています。冒頭には、ドキュメントを簡単にナビゲートするための目次シートがあります。あなたがクリックして関連する場所にリダイレクトすることができる各シートのためのセルがあります。このマクロとは何ですか、どのように作成されましたか?

ただし、これらのセルにボタンはありません。関連シートの名前が書かれたテキスト以外のセルには何も表示されません。セルを左クリックするだけで関連シートが表示されるだけでなく、右クリックしてキーボードの矢印キーを使用してセルに移動することもできます。私はこれまでボタンが使われていなかったこのようなことは何も経験していない。

文書が保護されているため、作成者がこれをどのように管理しているかを掘り下げることはできません。私はこの文書を作り直す必要がありますが、彼らが何をしているのかが完全にわからず、複製できません。私はこれが何らかのマクロであると仮定していますが、開発者用ツールバーの「マクロ」ツールには何も記載されていません。

このドキュメントには機密情報が含まれているため、スクリーンショットを含めることはできません。

+0

普通のハイパーリンクのような音です。確かに、ただ1つのセルのスクリーンショットを含めることができますか? – jeffreyweir

+0

矢印キーでも機能するので、ワークシートの選択変更イベントで動作していると言えます。 – Absinthe

+0

@jeffreyweirドキュメントが保護されているため、ハイパーリンクにアクセスできないようです。スクリーンショットをアップロードすることができたとしても、特別なものはありません。文字通り何らかのテキストを含むプレーンセルです。 – Cthulhu

答えて

1

Sheet1のジャンプテーブルがハイパーリンク(カーソルの動作を確認する)であれば、簡単に見つかるはずです。そうでなければ、この行動はWorksheet_SelectionChange()トリガーによって促進されます。

すべてのシート名が[JumpTable]と呼ばれる範囲内でSheet1にリストされていると仮定し、その後、Sheet1

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
    If Not Intersect(Target, Range("JumpTable")) Is Nothing Then 
     If Target.Rows.Count = 1 And Target.Columns.Count = 1 Then 
      Sheets(Target.Value).Activate 
     End If 
    End If 
End Sub 

でこのコードは名前をSheet1をクリックしてシートにあなたを取得します。

残りはあなたの想像力です!

+0

ハイパーリンクではなく、そのコードが扱います! – Cthulhu

関連する問題