向选择Excel

Question

这可能非常简单但是如果我已经有了选择，我怎么能添加下一行而不知道下一行是什么？

修改 例如，如果我有输入范围“D1：D8”，我怎么能在下一行添加，即“D1：D9”而不放入“D1：D9”。

Answer 1

尝试

Sub inc_row()
Selection.Resize(Selection.Rows.Count + 1, Selection.Columns.Count).Select
End Sub

这会将您的选择增加1行，它也会选择新范围

Answer 2

Sub test()
    Dim rng As Range
    Set rng = Range("b2:f5")
    Debug.Print rng.Address     'returns $B$2:$F$5
    Set rng = rng.Resize(rng.Rows.Count + 1)
    Debug.Print rng.Address     'returns $B$2:$F$6
End Sub