excel - 在过滤范围内选择一列
问题描述
我试图在过滤范围内选择一列,但它一直选择第一个单元格。我已经过滤掉了表格,只需要选择实际的列(E 列),减去标题。
这是我目前拥有的:
'After sorting, we will end up with several data rows for
'which we will need to sort from. Now that we have a filtered table,
'we would then need to created a variable for our new filtered range
Dim DeliverableTablefltrdRng As Range
Set DeliverableTablefltrdRng = rRange.SpecialCells(xlCellTypeVisible)
'Now that we have all these sorted, we will then need to
'verify whether the target finish date is within the start and end date
Dim WorkOrderRange As Range
Set WorkOrderRange = DeliverableTablefltrdRng.SpecialCells(xlCellTypeVisible).Range("E2:E" & Cells(Rows.Count, 1).End(xlUp).Row).Select
解决方案
无需事先提取可见单元格范围。请测试下一个方法:
Sub testSelectVisColRange()
Dim sh As Worksheet, lastR As Long, WorkOrderRange As Range
'your code filterring...
Set sh = ActiveSheet
lastR = sh.Range("E" & rows.count).End(xlUp).row
Set WorkOrderRange = sh.Range("E2:E" & lastR).SpecialCells(xlCellTypeVisible)
WorkOrderRange.Select
End Sub
代码应该有一种(简单)的方式来处理在没有任何可见单元格的情况下引发的错误,但这只是一个示例,显示了要遵循的方式......
推荐阅读
- c - 循环索引的伪代码以 2 开头
- c++ - 就地创建 std::optional
- pyspark - pyspark.sql.utils.AnalysisException:参考“cte5.cte5_cnt”不明确
- javascript - 如何将数组奇数位置的值加倍,并返回完整数组?
- javascript - MediaElement 跟踪观看时间
- math - 如何在给定总量的情况下将比率转换为数字?
- clang - 如何遍历 RecursiveASTVisitor 中的隐式代码?
- python - Hackerrank Python 嵌套列表练习
- haskell - 是否可以定义这样的 malloc 和 free 以使其数据由 GHC 运行时管理?
- mysql - 我应该将列一一添加到mysql db而不是在一个语句中吗