Foxtable(狐表)用户栏目专家坐堂 → 代码优化


  共有5081人关注过本帖平板打印复制链接

主题:代码优化

帅哥哟,离线,有人找我吗?
wangglby
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:337 积分:3225 威望:0 精华:0 注册:2020/2/25 23:12:00
代码优化  发帖心情 Post By:2022/6/9 21:15:00 [只看该作者]

  找到excel表格中指定列,第一个等于某字符的 行号,  这段代码有点慢,有更快的替代方案吗            
   
                    DIM AAA AS STRING
                    Dim Book As New XLS.Book(mc1)   
                    Dim Sheet As XLS.Sheet = Book.Sheets(0)
                    Dim m As Integer = 0
                    
                                  
                    For n As Integer = 0 To Sheet.Rows.Count -1    
                        If sheet(n,4).Text = AAA  Then
                            m=n
                            Exit For
                        End If
                    Next

[此贴子已经被作者于2022/6/9 21:18:49编辑过]

 回到顶部