[VBA ] 有好方法可以選擇多列嗎？

[Maybetrue (No one Remember)]

我有一筆資料，但是列與列中間會插一些無意義的空列位。

為了方便我算總數以及定位置，我需要砍掉這些空列位。

但是空列位出現的列號不是具有規則的。


我目前的作法是用一個DO迴圈檢查，檢查到該列的第一個儲存格為無內容

就刪除該列。例如：

If Cells(exampleRow, 1) = "" Then
        Rows( exampleRow ).Delete (xlShiftUp)
End If


但是這樣一個個刪除很慢。不知道有沒有辦法可以先讓我把空列位的列號存在

陣列中，再取出、多重選取多列，再一次刪除多列的寫法。

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 220.128.79.49
→ MOONRAKER:會刪到很慢 你檔案是有幾萬行
→ Maybetrue:2000行就會感覺到慢了
→ Semisphere:有關調自動計算?
→ iBonus:先用第一欄為主要鍵將資料排序,非空白列集中後再繼續處理?
→ Maybetrue:用資料排序在我這個案例我覺得不適用耶。因為我手上的
→ Maybetrue:資料不能把互相混雜。用資料排序的話，我怕會把不該參
→ Maybetrue:近來的資料參進來，或者是漏掉原本該有的資料。
→ iBonus:關閉螢幕更新讓程式執行快一點
→ iBonus:(Application.ScreenUpdating = False)
推 yuchiuan:關閉螢幕更新有感覺比較快 很實用
→ Maybetrue:謝謝@@"
→ Maybetrue:關閉螢幕更新之後，執行起來好像當機@@"""
推 dontgetup:可以考慮排序完在丟進陣列中..
→ iBonus:執行完記得恢復螢幕更新