FC2ブログ
 

セルにURL貼り付けただけだとハイパーリンクにならんよね

セルにURL貼り付けただけだとハイパーリンクにならんよね

Excel2010です。
ブラウザのアドレスバーをコピーしてURLをクリップボードに保存した状態で、セルを右クリック→貼り付けとやると、確かにURLが書き込まれますが、ハイパーリンクの機能を持っていません。
そうしたセルを一回ダブルクリックしてからEnterキーを叩けば、ハイパーリンク機能を持ったセルになりますし、貼り付ける時にセルをダブルクリックしてから貼り付けるかたちならハイパーリンクの機能を持ってはくれます。でもそれちょっとめんどくさいんです。

亜種
末尾の数値が一つずつ増える形のURLをオートフィルで作成したのですが、作成された各セルがハイパーリンクになりません。

亜種2
ハイパーリンクが張られたセルをオートフィルでコピーしても、表示される文字列こそ連番にはなるけど、全てのセルのハイパーリンク先が一番最初のコピー元のセルと同じになってしまいます。

~テンプレ~

マクロの出番だぜ。
Sub ハイパーリンク化()
  Dim i As Long
   With ActiveSheet.Hyperlinks
    For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
     Add Anchor:=Cells(i, "A"), Address:=Cells(i, "A").Value
    Next i
  End With
End Sub

で修正されます。


関連記事
Guide
  •  …この記事と同じカテゴリの前後記事へのページナビ
  •  …この記事の前後に投稿された記事へのページナビ
 

~ Comment ~

  ※コメントの編集用
  シークレットコメントにする (管理者のみ表示)

~ Trackback ~

卜ラックバックURL


この記事にトラックバックする(FC2ブログユーザー)

MENU anime_down3.gif

同じカテゴリの記事が一覧表示されます
同じタグの記事が一覧表示されます
更新月別の記事が一覧表示されます
キーワードで記事を検索