如何将活动选择移至同一行的特定列？

Question

我连续选择了一个单元格。我希望所选内容保留在同一行，但要移至同一行中特定列中的一系列单元格。

我向下移动了一个单元格并选择了一个单元格范围，并删除了如下内容：

ActiveCell.Offset(1, 0).Range("S1,A1:Q1").Select
Application.CutCopyMode = False
Selection.ClearContents

现在，我想在同一行中选择列37:39。
是否有仅移至特定列的功能？

Answer 1

考虑：

Sub marine()
    Dim rw As Long
    rw = Selection.Row
    Range(Cells(rw, 37), Cells(rw, 39)).Select
    MsgBox Selection.Address(0, 0)
End Sub