注:该区域为整个筛选区域,包含筛选后显示的和没有显示的区域AutoFilter.Range.SpecialCells(xlCellTypeVisible):通过获取筛选区域的可见单元格的方法得到筛选结果的单元格区域。语法表达式。区域 _表达式_一个代表**自动筛选** 对象的变量。 示例下面的示例将应用于 Crew 工作表的自动筛选的地址存储在变量中。 VB rAddress = Worksheets('Crew').AutoFilter.Range.Address 此示例滚动工作簿窗口,直至超链接区域位于活动窗口的左上角。 VB Workbooks(1).Activate Set hr = ActiveSheet.Hyperlinks(1).Range ActiveWindow.ScrollRow = hr.Row ActiveWindow.ScrollColumn = hr.Column |
|