VBA宏批量将EXCEL中文本表示的URL链接地址转换为可点击的链接

我们的表格中存储了大量用文本格式存储的网页链接，也就是鼠标无法直接点击打开的链接，我们想转换成可以在表格中直接鼠标点击就能打开网页的网址链接格式，这个时候就可以用到这个宏

Sub URL()
Dim R As Range
    For Each R In Selection
        ActiveSheet.Hyperlinks.Add R, R.Text
    Next
End Sub

宏的用法就是选中需要转换成链接的单元格区间，然后执行宏就行了