Excel VBA: Можно ли просто расширить диапазон на один?

Question

У меня есть инструкция в VBA для создания диапазона, который затем выбирается и копируется. После этого я вставляю это где-то еще. Но последняя строка вставлена ​​без новой строки, поэтому я хотел бы расширить свой диапазон на один. Мой текущий отчет:

Set twoRange = Range("A2", Range("A2").End(xlDown)) 
twoRange.Select 
twoRange.Copy 

Каков самый простой способ расширить этот диапазон на одну строку вниз?

Answer 1

Да:

Set twoRange = Range("A2", Range("A2").End(xlDown).Offset(1)) 
twoRange.Copy 

Вы используете Offset, чтобы переместить еще одну ячейку вниз. Смещение использует этот формат: `Смещение (строки, [столбцы])

Вам также не нужно выбирать диапазон для копирования диапазона.

Answer 2

Вы можете сделать

Set twoRange = Range("A2:A" & Range("A2").End(xlDown).Row + 1) 

который добавляет один к строке, найденной с помощью xlDown подхода.