Is there a faster way to resize grid?

[brucevde]

Is there more code in your For Loop that you are not showing? It doesn't make sense to call RowHeight for every column. In fact there is no need to use a loop at all. If you specify -1 as the row index to RowHeight all rows will be adjusted.

The following method is instantaneous on a grid with 15000 rows and 10 cols - even on my PII 300mhz 128mb RAM.

With MSFlexGrid1
    .Redraw = False
    [B].RowHeight(-1) = 600[/B]     
    .RowHeight(0) = 300 '
    .Redraw = True
End With