如何传递光标并将焦点设置在VBA中的Userform文本框中？

在下面的程序中，我收到此错误：运行时错误“-2147467259（80004005）”：未指定的错误。 通过突出显示此代码： txtStartDate.SetFocus在这一行： If txtStartDate.Text = "" Then txtStartDate.SetFocus

 Private Sub txtTimeUnit_Exit(ByVal Cancel As MSForms.ReturnBoolean) If IsError(Application.Match(txtTimeUnit.Text, Range("intTable[Units]"), 0)) Then lblStatusBar = "Please correct value." Cancel = True Exit Sub End If lblStatusBar = vbNullString Range("CToDate").Value = txtTimeUnit.Text If txtStartDate.Text = "" Then txtStartDate.SetFocus If txtEndDate.Text = "" Then txtEndDate.SetFocus End Sub 

任何人都可以帮我关于这个错误，并将文本框焦点（光标）到另一个文本框？

Answer 1

更换

 If txtStartDate.Text = "" Then txtStartDate.SetFocus 

通过

 If txtStartDate.Text = "" Then txtStartDate.SetFocus Exit Sub End If