logファイル(7~8万行程度)を読み込み、A列に空白があった場合に、
その列を削除する処理ですが、この処理だけでも
3~5分程度かかってしまいます。
Excelの処理では、7~8万行の処理では、このぐらいの時間がかかって
しまうものなのでしょうか?
PCのスペックは、Win10pro core i7 メモリ16GBです。
Sub test()
Dim txtPath As String
Dim TmpMaxRow As Long
txtPath = "C:\sample.log"
Workbooks.OpenText Filename:=txtPath, _
DataType:=xlDelimited, _
Tab:=True, _
Space:=True
'A列に空白行があった場合は、その列を削除
TmpMaxRow = Cells(Rows.Count, "A").End(xlUp).Row
Range("A1:A" & TmpMaxRow).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
end sub