EXCEL VBAコミュの【質問】ハイパーリンクがうまく認識されない

初めまして。
最近VBAを始めて何がなにやら手探り状態です(>_<)
調べてもどうしてもわからないので質問させてください。

表題の件なのですが、
今シートにデータを入力するマクロをくんでいます。
セルに値が入ってハイパーリンクの書式にはなるのですが、
セルの上でマウスのポインターが変化せず、リンク先に飛べません。
一度セルをダブルクリックし編集モードにしたあと、
そのままエンターするときちんと認識されます。
最初からハイパーリンクとして認識してもらうのはどうしたらよいのでしょうか。

◆バージョン　：　Excel2003

◆吐き出しプログラムソース

Private Sub default_Click()
'シートにデータを転記(そのまま

Dim y As Integer

y = Range("p4")

Cells(y, 3) = "○"
Cells(y, 4) = input2.customer
Cells(y, 5) = input2.place
Cells(y, 6) = input2.conv
Cells(y, 7) = input2.stage
Cells(y, 8) = input2.tact
Cells(y, 9) = input2.robots
Cells(y, 10) = input2.address
Cells(y, 12) = input2.eigyo
Cells(y, 13) = input2.biko
ActiveSheet.Hyperlinks.Add _
anchor:=Cells(y, 11), _
address:=input2.address, _
TextToDisplay:="input2.address.Value"

gyo_check.Hide

Rows(y).Select

End Sub

◆シートに書き出した時の様子
写真左

◆input2.addressの取得フォーム
写真右

よろしくお願いします。

コメント(2)

最初
全て
最新の40件

[1] mixiユーザー 08月23日 18:39

>> ActiveSheet.Hyperlinks.Add _
>> anchor:=Cells(y, 11), _
>> address:=input2.address, _
>> TextToDisplay:="input2.address.Value"

これはハイパーリンクになりますが・・・（K列）

>> Cells(y, 10) = input2.address

恐らくこっちに張りたかったんだと思いますが、これはハイパーリンクにはなりません。（J列）

[2] mixiユーザー 08月24日 01:21

ｶﾞ------------ﾝΣ(ﾟДﾟ;）
それか！？
そこ一行の間で一行非表示にしてるので気づきませんでした。
明日会社に行ってからもう一度確認してみます。

ofさんありがとうございます。

ログインすると、みんなのコメントがもっと見れるよ