程序问答   发布时间:2022-06-02  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了无需循环即可获取行位置大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。

如何解决无需循环即可获取行位置?

开发过程中遇到无需循环即可获取行位置的问题如何解决?下面主要结合日常开发的经验,给出你关于无需循环即可获取行位置的解决方法建议,希望对你解决无需循环即可获取行位置有所启发或帮助;

是否可以在不执行循环的情况下在 excel 中获取大表中的行位置? 我想要做的是点击一个特定的 ID,然后来自同一 ID 的最后 3 条记录将显示在 UI 中。

我是编程初学者,除了循环方法(虑到我们在用户的每次单击中循环一个包含 100k 行的大型且不断增长的表,这是非常资源和内存密集型的)之外,我不知道如何执行此操作。

例如:如果用户点击“A123”,那么我们知道他们的行位置是:5,8,10

无需循环即可获取行位置

解决方法

循环过滤列表

Option Explicit
Sub Filtered()

    Dim rng as Range,ID As Range,a As Range
    Dim ar(2) As Long,i As Integer,j As Integer
    
    ' apply filter
    With Sheet1
        .AutoFilterMode = false
        .UsedRange.AutoFilter 1,"A123"
        Set rng = .UsedRange.columns(1).SpecialCells(xlCellTypeVisiblE)
    End With

    ' count
    For Each a In rng.Areas
        For Each ID In a.Cells
            If ID.Row > 1 Then
                i = (i + 1) Mod 3
                ar(i) = ID.Row
            End If
        Next
    Next
    For j = 1 To 3
        Debug.Print ar((j + i) Mod 3)
    Next
End Sub
,

与发布的 CDP1802 相同,但可以更快地找到最后 3 行。

gtpec_cluster.pyd is not a valid Win32 application

大佬总结

以上是大佬教程为你收集整理的无需循环即可获取行位置全部内容,希望文章能够帮你解决无需循环即可获取行位置所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。