Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


27265 / 76738 ←次へ | 前へ→

【54796】ハイパーリンクの作成で
質問  まいける  - 08/3/30(日) 14:36 -

引用なし
パスワード
   ずっと調べたのですがBook内のSheetのハイパーリンクを目次ページ
に作りたいのですがどうやってもうまくいきません。お暇がありましたらよろ
しくお願いします。
シート1でコマンドボタンを押すとシート3を複数コピーするように作ってあ
ります。
そうすると同時にシート2のセルへリンクを貼ります。
それがどうしても・・・シート2のセルへはリンク先の名前は入りますが違う
シートにハイパーリンクが出来しかも飛ぶことが出来ません。
わたすぃのコードです。

Sub link()

  Dim moji As Variant
  Dim adds As Workbooks

   moji = aioue
   Set adds = Thisworkbook.Worksheets(Sheet2)

     Range("A5").select
   ActiveSheet.Hyperlinks.add Anchor:= selection, _
adress:adds, Text To Display:=moji
End Sub

どうか助けてください
お願いします

0 hits

【54796】ハイパーリンクの作成で まいける 08/3/30(日) 14:36 質問
【54801】Re:ハイパーリンクの作成で ichinose 08/3/30(日) 20:39 発言
【54805】Re:ハイパーリンクの作成で まいける 08/3/30(日) 23:25 発言
【54806】Re:ハイパーリンクの作成で りん 08/3/31(月) 8:07 発言
【54807】Re:ハイパーリンクの作成で まいける君を叱る 08/3/31(月) 8:34 回答
【54828】Re:ハイパーリンクの作成で まいける 08/3/31(月) 23:56 お礼
【54829】Re:ハイパーリンクの作成で まいける君を叱る 08/4/1(火) 8:00 発言
【54833】Re:ハイパーリンクの作成で VBWASURETA 08/4/1(火) 11:19 発言

27265 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free