質問: vbaでのハイパーリンク g1セルにurlが入力されており、そのurlをハイパーリンクにしたいです。下のg2からずっとurlが入っており同じ処理を記入がなくなるまで繰り返し行いたいです。どのような式で行えるでしょうか?なかなかうまくいかずお力添えいただきたいです。
回答: 以下で試してみてください。 urlのあるセルにそのままハイパーリンクしてますが別のセルの列にしたい場合は anchor:=.cells(i, "g") の"g"を変更してください。 sub test() dim i as long with sheets("sheet1") for i = 1 to .cells(rows.count, "g").end(xlup).row .hyperlinks.add anchor:=.cells(i, "g"), _ address:=.cells(i, "g").value _ ', texttodisplay:= 個々のセルに表示したい何かがあればここに記載して「']を外す next end with end sub