摘要： 要选择工作表中所有包含超链接的单元格，用定位或查找的方法无法实现。下面的VBA代码可以实现这一目的。
Excel VBA中debug.print解释和使用介绍
VBA 中Debug.Print 是什么意思？ debug.print的使用方法是怎样的呢？ VBA 中Debug.Print 的作用是将代码执行结果显示在“立即窗口”中。 比如，我们按ALT F11组合键，打开VBE窗口，插入——模块，输入下面的代码： Sub 测试
按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”宏即可选择工作表中所有包含超链接的单元格。
excel VBA快速取消工作簿中各工作表的自动筛选
当工作簿中的工作表数量较多时，要快速取消各个工作表中的自动筛选可以下面的VBA代码。 1.按Alt F11，打开VBA编辑器。 2.在代码窗口中输入下列代码 Sub RemoveAllAutoFilter()Dim sht As WorksheetFor Each sht In ActiveWorkbook.Work
