68手游网

搜索

热门标签

Excel2003教程 Excel2007教程 Excel2010教程 Excel2013教程 Excel2016教程 Excel视频教程 Excel函数教程Excel VBA教程 Excel技巧 Excel下载
返回首页
当前位置: 主页 > Excel教程 > Excel VBA教程 >

excel用VBA选择工作表中所有包含超链接的单元格

时间:2012-08-20 14:27来源:Office教程学习网 www.office68.com编辑:麦田守望者

要选择工作表中所有包含超链接的单元格，用定位或查找的方法无法实现。下面的VBA代码可以实现这一目的。

按Alt+F11，打开VBA编辑器，在“工程”窗口中双击某个工作表，在右侧的代码窗口中输入下列代码：

Sub SelectHyperlinkCells()
Dim hHlink As Hyperlink
Dim rRange As Range
Dim NotFirstlink As Boolean
On Error Resume Next
For Each hHlink In ActiveSheet.Hyperlinks
If NotFirstlink Then
Set rRange = Application.Union(rRange, hHlink.Range)
Else
Set rRange = hHlink.Range
NotFirstlink = True
End If
Next
If rRange Is Nothing Then End
rRange.Select
End Sub
 
关闭VBA编辑器返回工作表界面，按Alt+F8打开“宏”对话框，运行“SelectHyperlinkCells”宏即可选择工作表中所有包含超链接的单元格。

------分隔线----------------------------
标签(Tag):excel excel2007 excel2010 excel2003 excel技巧 excel教程 excel实例教程 excel2010技巧
------分隔线----------------------------
相关文章
推荐内容
猜你感兴趣
热点内容
随机推荐

　　 　　 关于我们 ┆ 免责声明 ┆

68手游网 ® Copyright 2011-2017 www.office68.com. Some Rights Reserved.- 网站备案：