![]() |
||
|
Regular Member
![]() ![]() 加入日期: Mar 2002 您的住址: 台北市
文章: 91
|
excel vba 在目前儲存格插入一行的問題
各位先進~我知道在指定位置插入一行的指令碼為(x代表位置)
Rows("x:x").Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove 但是我想要的效果是 不管目前儲存格是什麼位置,按下按鈕後,就是目前儲存格向下插入一行。 這似乎有關RangeSelection.address,但是我試好久都一直試不出來…希望有經驗的前輩指教一下,謝謝。 |
|||||||
|
|
|
Regular Member
![]() ![]() 加入日期: Mar 2002 您的住址: 台北市
文章: 91
|
自已找到答案了,自問自答…將下列程式碼貼到按鈕中就可以了
Sub InsertRow() Dim rRow As Long rRow = Selection.Row ActiveSheet.Rows(rRow).Insert |
||
|
|