ｴｸｾﾙ2003でﾊｲﾊﾟｰﾘﾝｸのやり方の質問です｡普通の方法はちょっと思い出せませんが､ﾏｸﾛならできます｡
とりあえずできれば内容は今のところわからなくても大丈夫ということなら
以下をｺﾋﾟｰして貼り付ければできると思います｡
※動かす前に､自分がﾘﾝｸさせたいｾﾙを全部選択状態にしてから動かしてください｡
Sub Macro1()
oColumn = Selection.Column
oRow = Selection.Row
owidth = Selection.Columns.Count
ohight = Selection.Rows.Count
For i = 0 To owidth - 1
For j = 0 To ohight - 1
setdata = Cells(j + oRow, i + oColumn)
If setdata <> "" Then
Cells(j + oRow, i + oColumn).Hyperlinks.Add Anchor:=Cells(j + oRow, i + oColumn), Address:=setdata
End If
Next j
Next i
End Sub
▽2
●
misozui ﾍﾞｽﾄｱﾝｻｰ |
HYPERLINK関数を使用すると簡単です｡URLが入力されているのがA列だとしたらB1ｾﾙに =HYPERLINK(A1) と入力して下にｺﾋﾟｰです｡
HYPERLINK関数を使用すると簡単です｡URLが入力されているのがA列だとしたらB1ｾﾙに =HYPERLINK(A1) と入力して下にｺﾋﾟｰです｡
