Excel VBA：xlToRight然后偏移，然后再次xlDown和偏移？

Question

我正在尝试执行以下操作：

• 选择单元格B3
• 选择最右边的值，然后将两列向右偏移
• 复制该单元格中的值，然后将其粘贴到单元格所在列的底部值下方。

我想按照以下方式进行：

Range("B3").Select
'Select value 2 columns to the right of the last value in the row
Selection.End(xlToRight).Offset(, 2).Select
Selection.Copy
'Do the same again, this time paste that copied value at the bottom of the column that cell is in
Range("B3").Select
Selection.End(xlToRight).Offset(, 2).Select
Selection.End(xlDown).Offset(1).Select
ActiveSheet.Paste

但是，该行代码存在问题：

Selection.End(xlDown).Offset(1).Select

出现错误：

  

运行时错误'1004'：应用程序定义或对象定义错误

我不知道如何指示VBA不仅选择单元格下方距离行末尾2列的单元格，而是选择单元格所在列中的最后一个值。