Visual Basic/Excel: 如何select 一个相对单元格?

Visual Basic/Excel: How to select a relative cell?

在我正在录制的宏中,我希望它 select 一行中的第二个单元格(B 列)。

所以如果 A7 被 selected,宏将 select A2,
如果 H4 是 selected,宏将 select H2.

您需要一个工作表事件。未经测试,但应该朝着正确的方向前进

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column < 2 Then
   Range(Target.Column.Offset(0,1)).Select
Elseif Target.Column > 2 Then
   Range(Target.Offset(0,2-Target.Column)).Select
End If
End Sub

考虑:

Sub dural()
    Cells(2, ActiveCell.Column).Select
End Sub

或select列2

Sub qwerty()
    Cells(ActiveCell.Row, 2).Select
End Sub