看板 [ Office ]
討論串[算表] vba迴圈刪除類似字眼資料?
共 4 篇文章
首頁
上一頁
1
下一頁
尾頁

推噓0(0推 0噓 0→)留言0則,0人參與, 最新作者diskk (oi)時間8年前 (2018/02/26 21:49), 編輯資訊
0
0
0
內容預覽:
建議你把range改成cells. 因為你用range("A" & i). 程式每一次要幫你合併文字,還要再轉成絕對座標. 這會浪費很多時間. 我寫了一小段測試程式. 你可以比較看看時間差異. Sub TestPerformance(). Dim st As Date. Dim et As Date
(還有293個字)

推噓0(0推 0噓 6→)留言6則,0人參與, 8年前最新作者newacc (XD)時間8年前 (2018/01/08 15:35), 8年前編輯資訊
0
0
0
內容預覽:
Rows(i).Delete是一個很花費資源的動作. 當行數一多,一行一行慢慢刪就會拖到快當機一樣. 比較好的方式是先記好要刪的行數. 掃完一遍之後讓電腦一次刪掉. 試試:. Sub test001(). Dim YY, XX, ZZ. YY = "*海外分行*". XX = "*機構名稱*". Z
(還有494個字)

推噓1(1推 0噓 19→)留言20則,0人參與, 8年前最新作者ptguitar (佩蒂吉他)時間8年前 (2018/01/08 14:57), 編輯資訊
0
0
0
內容預覽:
上次有問類似問題. 現在遇到困難就是. 遇到超大量資料 數十萬筆. 而要刪除的條件很多. 速度很慢. 不知道有什麼更快速寫法. ===. Sub test001(). Dim YY, XX, ZZ. YY = "*海外分行*". XX = "*機構名稱*". ZZ = "*工作表*". For i
(還有133個字)

推噓1(1推 0噓 7→)留言8則,0人參與, 最新作者ptguitar (佩蒂吉他)時間8年前 (2017/06/06 14:34), 8年前編輯資訊
0
0
1
內容預覽:
軟體:excel 2007以上. 版本: 2007以上. 我要把一整段有符合某字眼的刪除. Sub eachssdelete(). Dim ss As Object. lastrow = Range("A65536").End(xlUp).Row. For Each ss In Range("A1:
(還有787個字)
首頁
上一頁
1
下一頁
尾頁