vba UserForm1.Show 0 为什么窗体textbox1不能获得焦点?

工作表 sheets1 :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 2 Then UserForm1.Show 0 '这里有问题
end sub

UserForm1:
Private Sub UserForm_Initialize()
Me.TextBox1.SetFocus '让文本框获得焦点

End Sub

上面的工作表sheets1设置了 UserForm1.Show 0 则窗体的textbox1 死活启动时候获取不了焦点,而更改为UserForm1.Show 则可以获得焦点.
我想使用UserForm1.Show 0 又想窗体显示的时候textbox1可以获得焦点,请教高手如何解决?

Show 1模式窗体：窗体显示后将停止显示之后的代码直到退出或隐藏此窗体，并且必须退出或隐藏此窗体后，才可以操作非此窗体的其他界面元素。
Show 0无模式窗体：窗体显示后会继续执行程序里余下的语句，而其他的窗体或界面也可以进行操作。

估计你只是复制粘贴上面的代码 没有做一个窗体 这才造成424错误 附件的例表乱做一了一个窗体 运行vba后 自动弹出窗体 关闭该窗体后 自动填充单号并着色 如果不需要窗体的话 直接将下面这两句删掉 userform1.show pref = userform1.textbox1.value