Question

每当单元格A6发生变化时，我需要一个VBA将单元格选择向下移动到E列中的一行/单元格。请帮忙！谢谢！

如果A5发生变化，我已经有了一个VBA代码来保持同一单元格中的单元格选择。是否可以在同一张表中有两个这样的VBA更改代码？

Answer 1

你的问题的答案是肯定的。您只需添加要捕获的更改事件的条件。例如，下面的内容对您有用：

Private Sub Worksheet_Change(ByVal Target As Range)

    On Error GoTo forward
    Application.EnableEvents = False

    If Not Intersect(Target, Me.[A5]) Is Nothing Then
        '/* your code to keep selection */
    ElseIf Not Intersect(Target, Me.[A6]) Is Nothing Then
        '/* your code to move cell selection down */
    End If

forward:
    Application.EnableEvents = True

End Sub

VBA移动单元格选择

1 个答案: