返回列表 上一主題 發帖

請問各位大神加快 VBA 刪除為0的儲存格公式的程式寫法

quickfixer

帖子
154 
主題
1 
精華
0 
積分
200 
點名
1  
作業系統
windwos 7 
軟體版本
64bit 
閱讀權限
20 
註冊時間
2017-5-29 
最後登錄
2025-1-1 
1# 跳轉到 »
發表於 2019-12-24 05:22 | 顯示全部帖子
本帖最後由 quickfixer 於 2019-12-24 05:30 編輯

回復 1# jeffrey628litw

你的頭尾各加1行Application.Calculation,就可以跑很快了
ABC 20191219-V.04版,沒修改前,我的電腦要跑40秒
sub tt()
       Application.Calculation = xlCalculationManual

你的程式碼

       Application.Calculation = xlCalculationAutomatic
end sub
執行結果如下


用4f,5f更快
sub tt()
       Application.Calculation = xlCalculationManual
4f,5f程式碼
       Application.Calculation = xlCalculationAutomatic
end sub
執行結果如下
Image 9.png

TOP

        靜思自在 : 口說一句好話，如口出蓮花；口說一句壞話如口吐毒蛇。
返回列表 上一主題