エクセルで本当に困っています。助けてください。

質問

YAHOOオークションなどで買った物の一覧整理にエクセルを使っています。200行くらいある表です。買ったもののurlをエクセルのセルにハイパーリンクで挿入して、時々それをクリックしてweb表示しています。

昨日からですが、どのセルをクリックしても、とあるセルにある同じurlしか表示しなくなりました。見た目はそれぞれ違う文字列なのですが、クリックすると同じurlしかひらきません。オフィス2003についていたエクセルです。
たいへん困っています。助けてください。

回答No.2

ASIMOV · ベストアンサー

そのセルを右クリックして、「ハイパーリンク」「ハイパーリンクの編集」を見てください
「表示文字列」と「Webページ名」が合ってますか？

回答No.3

Wendy02

こんにちは。

最初に、私は、ちょうど、今年の、Yahoo!オークションサイトの改編の時期に、フリーソフトウェアやシェアウェアが間に合わないようでしたので、自分で作ってしまいました。ただ、かなり大きな内容で、ここでは全ては書けません。当分は、公開する予定もありません。完全に個人用として作ったものです。Vectorで出ているものよりは、はるかに便利です。

オークションの検索から始まり、ログイン、ウォッチリストへの登録、出品者の良い／悪い　開始価格、入札の数などすべてを自動的に取得するように作ってしまいました。入札のみ、危険なために作りませんでした。それと同時に、オークション統計（仮）ページ側の記録も取得するように作りました。

そうした経験からする、ハイパーリンクでは、私の感覚では数が増えると無理な部分があるような気がします。なぜか、ハイパーリンクが１つまとめられてしまうことがありますから、コツとしては、その商品IDコードをハイパーリンクでない文字で管理することでしょうね。ですから、私は、ハイパーリンクは使っていません。Internet Explorer オートメーションという方法を使って、そのシートの行からURL先に飛んでいます。

もし、商品IDが残っているようでしたら、以下が利用できます。残っていないと、ブックからでは、ちょっと厳しいですね。マイオークションの中の記録を拾ってくるしかないと思います。

字数の制限のある掲示板では、あまり細かい説明は出来ませんが、以下のようなユーザー定義関数で、URL に変換して組めば良いと思います。一通り、全ての商品IDには当てたつもりなのですが、商品IDの１文字目の"t"　以降はであっていませんので、分りません。数ヶ月経ちましたが、今のところ、私のほうは問題は出ていません。

'標準モジュールへ登録
'--------------------------------

Function ItemID2URL(ItemId As String)
Dim fig As String
　Select Case Left(ItemId, 1)
　Case "b"
　　fig = "2"
　Case "c"
　　fig = "3"
　Case "d"
　　fig = "4"
　Case "e"
　　fig = "5"
　Case "f"
　　fig = "6"
　Case "g"
　　fig = "7"
　Case "h"
　　fig = "8"
　Case "k"
　　fig = "9"
　Case "m"
　　fig = "10"
　Case "n"
　　fig = "11"
　Case "p"
　　fig = "12"
　Case "r"
　　fig = "13"
　Case "s"
　　fig = "14"
　Case "t"
　　fig = "15"　'Unconfirmed
　Case 1 To 9
　Case Else
　　fig = "n/a" 　'使えません。
　End Select
　ItemID2URL = "http://page" & fig & ".auctions.yahoo.co.jp/jp/auction/" & ItemId
End Function

'--------------------------------

ワークシートのほうには、 以下のようにすれば、利用できます。
例:

　　　A　　　　 B　　　　C
1　商品名　　URL　　　　商品ID
2　abc　 (下記参照）　 m123456789

B2:
=HYPERLINK(ItemID2URL(C2),A2)

回答No.1

noname#187541

こんばんは。

そのアドレスをアドレスバーに入れてきちんと表示できるか試してください。

最初はよかったのですから、リンク先がおかし句なったのかもしれません。同じところに行くようになっているとか。