[已解决]如何解除文件链接【十万火急，求高手！】

lolissa

lisachen 发表于 2014-1-20 16:56
Worksheets(1)改成你的Worksheets("你的工作表名称")

{:011:}不好意思，我再改一下看看。。。。

lolissa

lisachen 发表于 2014-1-20 16:52
这个代码标记位置

大神，帮我看看还是哪里不对么？{:091:}

lolissa

lisachen 发表于 2014-1-20 16:56
Worksheets(1)改成你的Worksheets("你的工作表名称")

我输错格式了，顿悟了。不好意思。
已经可以运行了。太感谢了！！{:221:}

lolissa

lisachen 发表于 2014-1-20 16:56
Worksheets(1)改成你的Worksheets("你的工作表名称")

亲亲版主，可以再帮我看看不，宏已经运行了，但是仍无法解除link。

lisachen

试试把所有工作表中的超链接都删除

1. Sub 宏1()
   
2.     Dim h As Hyperlink
   
3.     Dim wb As Worksheet
   
4.     For Each wb In Worksheets
   
5.         For Each h In wb.Hyperlinks
   
6.             h.Range.Interior.ColorIndex = 3
   
7.         Next
   
8.     Next
   
9. End Sub

复制代码

tgydslr

学习学习

lolissa

lisachen 发表于 2014-1-20 17:55
试试把所有工作表中的超链接都删除

再次尝试了，把自定义公式、数据下拉列表等所有存在超链接的都清除了，但还是无法解除link。

请问还有什么地方的超链接是可能存在的？

tgydslr

lolissa 发表于 2014-1-21 16:55
再次尝试了，把自定义公式、数据下拉列表等所有存在超链接的都清除了，但还是无法解除link。

请问还有 ...

其实解除超链接的办法很简单，复制所有，新建，选择性粘贴-数值

lolissa

tgydslr 发表于 2014-1-21 17:08
其实解除超链接的办法很简单，复制所有，新建，选择性粘贴-数值

嗯，这是个好办法，我再试试看。非常感谢！

lolissa

上面的方法试了，仍然不行。还有没有高手支招！先谢了！{:35:}