【VBA】テキストボックス内でenterキーが押された時に別のボタンを押す

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

    If KeyCode = vbKeyReturn Then
        
        Call CommandButton1_Click
        
        KeyCode = 0
    
    End If


End Sub