您好,登录后才能下订单哦!
密码登录
登录注册
点击 登录注册 即表示同意《亿速云用户服务条款》
将大量excel内容自动匹配文件夹下的文件。
源代码
Sub 超链接()
For Each Rng In Selection
ActiveSheet.Hyperlinks.Add anchor:=Rng, Address:="新建文件夹\" & Rng & ".log"
Next
End Sub
运行保存
直接修改超链接
Sub ChangeHyperlink()
For Each c In ActiveSheet.Hyperlinks
c.Address = Replace(c.Address, "新建文件夹\", "新建文件夹22\")
Next
End Sub
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。