Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11324 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【16729】ハイパーリンクについて YO 04/8/7(土) 15:32 質問[未読]
【16730】Re:ハイパーリンクについて YO 04/8/7(土) 15:33 質問[未読]
【16731】Re:ハイパーリンクについて YO 04/8/7(土) 16:20 質問[未読]
【16734】Re:ハイパーリンクについて ぴかる 04/8/7(土) 17:04 発言[未読]
【16737】ハイパーリンクについて YO 04/8/7(土) 18:35 発言[未読]
【16751】Re:ハイパーリンクについて [名前なし] 04/8/8(日) 16:34 回答[未読]
【16729】ハイパーリンクについて
質問  YO  - 04/8/7(土) 15:32 -
引用なし
パスワード
   どなたか？分かるかたご教授願います。

シートの行方向に、ActiveSheet内のシートの名前を順に書き
そのシートへのハイパーリンクを貼ろうと思いマクロを組んでみました。

　For Each WS In Worksheets
　　 ActiveCell.Offset(1, 0).Activate
　　 ActiveCell.Value = WS.Name
　　ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", _
　　SubAddress:= WS.Name & "!A1", TextToDisplay:=ActiveCell.Value
　Next

こんな感じなのですが、うまくリンクされるシートと
「参照が正しくありません」というシートに分かれて出来しまいます。
手動でリンクを貼る分には特に問題はないのですが・・・・。

どなたか分かる方お願いします。　（WIN XP EXCEL XP です）
【16730】Re:ハイパーリンクについて
質問  YO  - 04/8/7(土) 15:33 -
引用なし
パスワード
   >シートの行方向に、ActiveSheet内のシートの名前を順に書き
>そのシートへのハイパーリンクを貼ろうと思いマクロを組んでみました。

すいません。列でした・・。
【16731】Re:ハイパーリンクについて
質問  YO  - 04/8/7(土) 16:20 -
引用なし
パスワード
   　６月　とか数字全角数字が入っているシート名の場合
参照がうまくいかないようです。
回避するには、数字をシート名に使わないしか方法は
ないのでしょうか？

回避方法ご存知の方お願いします。
【16734】Re:ハイパーリンクについて
発言  ぴかる  - 04/8/7(土) 17:04 -
引用なし
パスワード
   YOさん、こんにちは。

>　６月　とか数字全角数字が入っているシート名の場合
>参照がうまくいかないようです。
>回避するには、数字をシート名に使わないしか方法は
>ないのでしょうか？
WIN2000.XL2000では、数字全角数字問題ありませんでしたよ。ただ、シートを追加したやつがダメでした。しかし、シート名を変更した後、もう一度マクロを実行してやれば、ＯＫとなりました。以上、報告でした。もう帰宅しますんで、あとはどなた様かにアドバイスを頂いて下さい。
【16737】ハイパーリンクについて
発言  YO  - 04/8/7(土) 18:35 -
引用なし
パスワード
   ▼ぴかる さん：どうもありがとうです。

シート名を変更も試したのですがうまくいかないです。
とりあえず、全角数値は漢数字にでも変更しようと思います。

今ひとつ納得いかないけど・・・。
シート名にも命名規則みたいなのがあるのでしょうかね？
【16751】Re:ハイパーリンクについて
回答  [名前なし]  - 04/8/8(日) 16:34 -
引用なし
パスワード
   SubAddress:= WS.Name & "!A1", TextToDisplay:=ActiveCell.Value

　　　↓

SubAddress:="'" & WS.Name & "'!A1", TextToDisplay:=ActiveCell.Value

にしてみたらどうでしょうか？
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11324 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free