excel快速添加超链接的方法一

按住ALT依次按F11,I,M
粘贴以下代码后按F5

Sub test()
For Each K In Columns(3).Hyperlinks
ActiveSheet.Hyperlinks.Add K.Parent.Offset(0, 1), K.Name
Next
End Sub

这时候使用以上方法就可以完成上图的操作了。

Sorry, the comment form is closed at this time.

   
© 2012 Ai-WEB的博客 Suffusion theme by Sayontan Sinha