excel - Excel VBA - Range(..).Select 在 Application.SendKeys 之后不起作用

Question

我正在处理一些 VBA 代码：

Sub Move(ByVal Sheet As String)
    ThisWorkbook.Worksheets(Sheet).Select
    ThisWorkbook.Worksheets(Sheet).Range("A1").Select 'THIS WORKS
    
    For i = 1 To 3
        Application.SendKeys "{DOWN}"
    Next i
        
    For i = 1 To 3
        Application.SendKeys "{RIGHT}"
    Next i
    
    ThisWorkbook.Worksheets(Sheet).Range("A1").Select 'THIS DOESN'T WORK    
End Sub

奇怪的是，发送的密钥正在工作，但最后一行

    ThisWorkbook.Worksheets(Sheet).Range("A1").Select

什么也没做。就好像它被忽略了一样。

有什么解释吗？

谢谢你。

标签： excelvba