excel vba 在目前儲存格插入一行的問題
 

各位先進~我知道在指定位置插入一行的指令碼為(x代表位置)
Rows("x:x").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
但是我想要的效果是 不管目前儲存格是什麼位置，按下按鈕後，就是目前儲存格向下插入一行。
這似乎有關RangeSelection.address，但是我試好久都一直試不出來…希望有經驗的前輩指教一下，謝謝。

自已找到答案了，自問自答…將下列程式碼貼到按鈕中就可以了
Sub InsertRow()
Dim rRow As Long
rRow = Selection.Row
ActiveSheet.Rows(rRow).Insert