vba - 为组合框选择选项后移动到新选项卡

Question

我有一个表单，其中包含按选项卡组织的子表单。我想要做的是在输入新记录时更新字段后，将用户重定向到表单中的选项卡。

这可能是现有的代码。

Private Sub FIELD1_AfterUpdate()

If Me.FIELD1.Value = "Yes" Then

Me.Parent.TabCtl50.Value = 4

End If

End Sub

它给出了错误“应用程序定义的或对象定义的错误”

有任何想法吗？

Answer 1

您可以参考 pages 属性：

 Me.Parent.TabCtl50.Pages(4).SetFocus
 Me.Parent.TabCtl50.Pages("PageNameHere").SetFocus