Копирование диапазона из ячеек выше в VBA

Question

У меня есть формула, которая автоматически заполняет ячейки, копируя сверху вниз, и следующий код отлично работает для ссылок на ячейки, которые мне нужны.

Dim lstRw As Long 
Dim Rng As Range 
lstRw = Cells(Rows.Count, "A").End(xlUp).Row 
Set Rng = Range("A" & lstRw + 1) 
Range("A" & lstRw & ":C" & lstRw & ":I" & lstRw & ":N" & lstRw).Copy Range("A" & lstRw + 1) 
With Rng 

Однако .. Я также хочу код, чтобы скопировать вниз диапазон от AW: BK ..

Я попытался следующие:

Dim lstRw As Long 
Dim Rng As Range 
lstRw = Cells(Rows.Count, "A").End(xlUp).Row 
Set Rng = Range("A" & lstRw + 1) 
Range("A" & lstRw & ":C" & lstRw & ":I" & lstRw & ":N" & lstRw & "AW:BK" & lstRw).Copy Range("A" & lstRw + 1) 
With Rng 

Но я получаю ошибки компиляции!

С уважением

Answer 1

Изменить "AW:BK" для "AW" & lstRw & ":BK" & lstRw

Произнесите последняя строка строка 10, ссылаться на несколько колонок строки 10 вы должны написать AW10:BK10 ваш код просто нужно повторить это.

EDIT Я только сначала просмотрел часть AW: BK. Если вы пытаетесь выбрать столбцы A, C, I, N, AW: BK из той же строки нужно отделить их друг от друга запятых не двоеточие

range("A" & LstRw & ",C" & LstRw & ",I" & LstRw & ",N" & LstRw & ",AW" & LstRw & ":BK" & LstRw)