编辑超链接Excel 2010macros

好的,所以我想创build一个macros来replace超链接的一部分。 我有很多超链接在Excel文件中。 有没有办法创build一个macros来做到这一点。


例如

  • www.OldName.com/

  • www.Oldname.com/a/

  • www.Oldname.com/b/


  • www.NewName.com/

  • www.NewName.com/a/

  • www.Newname.com/b/

这将取代您的超链接,只需更改地址和string:

Range("E1").Hyperlinks.Add Range("E1"),Replace(Range("E1").Hyperlinks(1).Address, "google", "msn"), , , "newtext"