また、 D1の書式はD2以下にもコピーしていきます
http://arena.nikkeibp.co.jp/tec/excel/20040310/107762/
関数でハイパーリンクを作る / デジタルARENA
HYPERLINK関数を使ってはどうでしょう。
D1のセルの数式を
=HYPERLINK(A1&B1&C1,”○○のホームページ”)
とすればよいとおもいます。
URLはダミーで失礼します。
マクロを使うしか方法が無いように思えます。D列の値を全部&式で作った後に以下のスクリプトを走らせます:
Sub AddHypertext()
Set r = ActiveSheet.Columns(4)
For Each c In r.Cells
If (c.Text = ””) Then
Exit For
End If
Call c.Hyperlinks.Add(c, c.Text)
Next
End Sub
マクロという手もあるのですね ありがとうございました
回答者 | 回答 | 受取 | ベストアンサー | 回答時間 | |
---|---|---|---|---|---|
1 | vegah | 496回 | 446回 | 2回 | 2005-12-09 08:14:40 |
なりました
ありがとうございます