Question

我有一个非常简单的OFFSET函数，我连接到滚动条以滚动数据。 =OFFSET(A$2,$A$48,0)。当我过滤单元格A2-A45中的数据以仅选择某个类别时，我喜欢滚动OFFSET函数以跳过隐藏的单元格，只滚动过滤后仍然可见的数据。

Sub AddVisibleName()

    Dim rVisible As Range
    Dim lLastRow As Long

    lLastRow = Range("A" & Rows.Count).End(xlUp).Row

    Set rVisible = Range("A2:A45" & lLastRow).SpecialCells(xlCellTypeVisible)

    ActiveWorkbook.Names.Add Name:="VisibleRange", RefersTo:=rVisible

End Sub

上面的代码创建范围＆＃34; VisibleRange＆＃34;只有其中显示的非隐藏单元格的值。有没有办法将其纳入OFFSET功能？

欢迎任何其他更简单的实现我喜欢的方法

由于

Answer 1

这有帮助吗？

TERMINAL-TEST(state)

或者，这个？

Sub Macro1() 

    If Rows("1:10").EntireRow.Hidden = True Then 
        Rows("1:10").EntireRow.Hidden = False 
    ElseIf Columns("2:3").EntireColumn.Hidden = False Then 
        Columns("2:3").EntireColumn.Hidden = True 
    End If 

End Sub

Answer 2

尝试此代码。为我工作。

ActiveCell.Offset(1, 0).Select
Do Until ActiveCell.Height <> 0
ActiveCell.Offset(1, 0).Select
Loop

Excel - 是否可以使OFFSET函数跳过隐藏的单元格

2 个答案: