2011-01-27 5 views

答えて

3
ActiveSheet.Hyperlinks.Add ActiveCell, "", Sheets(fortnr).Name & "!A1" 

アドレスを空白にする必要があるとサブアドレスが形Sheet1のA1にする必要があります!。これは、同じブックの有効なシート名を含むfortnrという名前の変数があると仮定して、アクティブセルにリンクを設定します。

異なるブックのセルを参照する場合は、アドレスがそのファイルである必要がある以外はすべて同じです。

ActiveSheet.Hyperlinks.Add ActiveCell, Workbooks(1).FullName, Sheets(fortnr).Name & "!A1" 

と仮定すると、ワークブック(1)は、異なるファイルで、以前に保存されていると右の名前を持つシートなど、などがあります

+0

大丈夫ですが、最初に別のExcelファイルを開くと、そのファイルにハイパーリンクをリンクしようとします。 いつでもアクティブなブックにリンクすることは可能ですか? Excelファイルの名前自体が変更されるため、ファイル名の参照はありません。ありがとうございました – borlee

0

アイデア1:現在のアクティブセルへのハイパーリンクを追加します。

にリンクするシート名は "VBA1"

ActiveSheet.Hyperlinks.AddのActiveCell、 ""、 "VBA1であると仮定!A1"

アイデア2: "「 "CallButton"

ActiveSheet.Hyperlinks.Add ActiveSheet.Shapes( "CallButton")、" と命名された形状にハイパーリンクを追加VBA1 A1! "

関連する問題