Excel VBA вставить в смещение Activecell

Question

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

Я хотел бы скопировать вставку в смещение активной ячейки.Ячейка со смещением для вставки расположена на 1 ячейку слева и на 10 ячеек вверх.

1) Копирование L67 из рабочего листа "Другие данные" в активную ячейку

2) Копирование Q67 из рабочего листа "Другие данные" в активное смещение ячейки (-1, -10)

Мой код, который я пробовал:

Private Sub CommandButton2_Click()

'Paste to a Defined Range
ThisWorkbook.Sheets("Other Data").Range("L67").Copy

'Offset Paste (offsets 2 cells down and 1 to the right
ActiveCell.PasteSpecial xlPasteValues

ThisWorkbook.Sheets("Other Data").Range("Q67").Copy
ActiveCell.Offset(-1, -10).PasteSpecial xlPasteValues

End Sub

Я получаю сообщение об ошибке:

ActiveCell.Offset(-1, -10).PasteSpecial xlPasteValues

Answer 1

У вас неправильные смещения.Первое число - строки, второе - столбцы, поэтому это будет:

ActiveCell.Offset(-10, -1).PasteSpecial xlPasteValues