本文記錄，通過 Excel VBA，插入多行的方法；以插入500行為例，來對比算法上的優劣；是一次很典型的，對算法的闡述；面向小白，言簡意賅 (^_^)
方法 1 (普通)：
這種方式是最直觀，但也是最慢的方法；原理就是，一行一行的插入；插入500行，大約要 27.34375 秒；非常的慢！Big O = O(n) = 500；
' insert 500 rows in sheet, with loop
For i = 1 To 500
Rows(Selection.Row).Insert
Next
方法 2 (算法)：
這種方法的精彩之處在於算法；它遠快於 "方法1"，但還不是最快的！大約要 0.5390625 秒；這種方法的 Big O = O (logN+1) = log500+1 = 9；
' insert 500 rows in sheet, with algorithm
cum_multiplier = 1
For i = 1 To 500
If cum_multiplier * 2 < 500 Then
Rows(Selection.Row & ":" & (Selection.Row + cum_multiplier - 1)).Insert
cum_multiplier = cum_multiplier * 2
Else
rows_remain = 500 - cum_multiplier
Rows(Selection.Row & ":" & (Selection.Row + rows_remain)).Insert
Exit Sub
End If
Next
方法 3 (最快)：
這種方法使用的是 VBA 中，Range.Resize() 方法；代碼長度，只有一行；速度也最快，只需 0.078125 秒，但是插入點下面的行越多，花費的時間就越長；從算法的角度來看 Big O = O(1) = 1；
' insert 500 rows in sheet, with Range.Resize()
' insert with format copied
ActiveCell.EntireRow.Offset(1).Resize(500).Insert Shift:=xlDown
' insert without format copied
ActiveCell.EntireRow.Resize(500).Insert
方法 4 (便利)：
這種方法使用的是 VBA 中，Range().EntireRow.Insert 方法，和 Rows().Insert 方法；代碼也只有 一行；速度也只需 0.078125 秒，但是插入點下面的行越多，花費的時間就越長；同上，從算法的角度來看 Big O = O(1) = 1；這種方法的好處是，可以指定要從哪行開始插入，是一個額外的方便之處。
' insert 500 rows in sheet, from specified row
' insert rows with Range().EntireRow.Insert method
Range("12:512").EntireRow.Insert
' insert rows with Rows().Insert method
Rows(12 & ":" & 512).Insert
' or with variable
Rows(Selection.Row & ":" & (Selection.Row + 500)).Insert
篇尾總結：
文中記述的方法，是比較簡單，是一個不錯的知識點記錄；但更重要的是，用這簡單的代碼，講述了算法的意義，和 big O 的概念。文章面向初學者，希望對大家有幫助；小白貢獻，語失莫怪，開心每一天 (^_^)~~~
我的博客：
請來關注吧 (^_^)v Bitssea: www.cnblogs.com/bitssea