选择活动单元格左侧和右侧5个单元格

Question

我正在尝试选择并复制excel中活动单元格左侧和右侧5行的一行单元格（选择应包括我的活动单元格）。

我将此草案代码作为示例：

Sub ExtendAndCopy5CellsToRight()
    ActiveCell.Resize(1, 5).Copy
End Sub

但是我需要在活动单元格的左侧和右侧选择1个单元格（选择应包括我的活动单元格）。

Answer 1

使用Range.Offset property重置起始位置。 Range.Resize property控制要复制的范围的形状。

ActiveCell.Resize(1, 6).Offset(0, -1).Copy

在你的叙述和样本之间，对于是否调整6列宽或5来说有点不清楚。上面设置为6但应该很容易改变。