エクセル(VBA)の処理速度について

質問

よろしくお願い致します。
エクセルのシートが30あります。

各シートで、メインの動作として下記のコードをした後、プリントアウトするようにしています。
すべての動作終了(30シート分の印刷)までに20分程度かかります。

下記のコード以外の記述などで、早く出来る方法がありましたら、教えていただきたくお願い致します。(現時点では、手作業の方が早いかもしれません。)

※パソコンのスペックは、コアi7・メモリ8Gなので問題ないと思います。

For i = 0 To 63
Cells(15 + i, 1).Select
If Selection.Value = 0 Then
Selection.EntireRow.Hidden = True
End If
Next i

回答No.1

tsubuyuki · ベストアンサー

そこだけ見せられても＾＾；

まぁ、Application.ScreenUpdating = False は使ってらっしゃるとして、
とりあえずその部分はSelectを使わずに書けば「ほんの少々」早くなるかも。

　　For i = 0 To 63
　　　　If Cells(15 + i, 1).Value = 0 Then
　　　　　　Rows(15 + i).Hidden = True
　　　　End If
　　Next i

とか。