vba 找儲存格位置執行效能請益 - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » vba 找儲存格位置執行效能請益

返回列表下一主題上一主題發帖

[發問] vba 找儲存格位置執行效能請益

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

1^# 跳轉到 »

發表於 2017-3-27 14:24 | 顯示全部帖子

本帖最後由 stillfish00 於 2017-3-27 14:28 編輯

回復 2# ketrddem
你的方法二不要在For裡面一個一個從Cell取到陣列
而是先一次取出來...

Sub find2()
Dim s
T = Timer
s = Sheets("工作表1").Cells(1, 1).Resize(1000000, 1)
For i = 1 To 1000000
If s(i, 1) = "987267" Then
Exit For
End If
Next
MsgBox "第" & i & "行 , " & Timer - T
End Sub

複製代碼

表達不清、題意不明確、沒附檔案格式、沒有討論問題的態度~~~~~~以上愛莫能助。

靜思自在 : 要比誰更受誰．不要比誰更怕誰。

返回列表下一主題上一主題