返回列表 上一主題 發帖

[發問] 是否可加速搜尋的速度

shuo1125

帖子
121 
主題
8 
精華
0 
積分
170 
點名
49  
作業系統
win10 
軟體版本
Office2016 
閱讀權限
20 
性別
男 
註冊時間
2021-1-21 
最後登錄
2024-5-9 
1# 跳轉到 »
發表於 2023-11-28 14:47 | 顯示全部帖子
本帖最後由 shuo1125 於 2023-11-28 14:49 編輯

回復 10# Andy2483
感謝Andy大分享For Each另解，原來xlCellTypeConstants包含常數的儲存格也能這樣使用，
以下有錯在煩請指正。

        ' 遍歷 xA 中的每一個儲存格，排除標題
    For Each A In xA.Offset(1, 0).SpecialCells(2)
        ' 在字典中添加項目，鍵為A 值為xA
        Z(A.Value) = xA.Cells(1, A.Column).Value
    Next A

TOP

        靜思自在 : 吃苦了苦、苦盡廿來，享福了福、福盡悲來。
返回列表 上一主題