问题描述
我有以下VBA代码,该代码应显示另一个隐藏工作表中的数据表单。
Sub CoverageBssEntry()
Application.ScreenUpdating = False
Sheets(\"myhiddensheet\").Select
Range(\"myTable[#All]\").Select
ActiveSheet.ShowDataForm
End Sub
当我运行此命令时,数据表单不包含该表的标签和输入框。
非常感谢您的帮助,因为它使我发疯!我唯一的选择是花费时间来构建自定义的用户表单,而这样做会很完美。
解决方法
您无法选择隐藏的工作表。而且无论如何都不需要“ 1”语句
尝试
Sheets(\"myhiddensheet\").ShowDataForm
,解决方法是使用:
ActiveSheet.Cells(x,y).Select
在调用.ShowDataForm之前,就像一个工作!
,我认为ShowDataForm命令存在真正的限制。如果在特定范围内在VBA之外调用,它可以正常工作。但是,一旦被编码到VBA中,即使记录了执行该操作的宏,它也只会返回被引用工作表中第一个表的表单。
我不知道为什么。可能是因为showdataform事件与工作表相关,而不与调用该事件时选择的表或列表相关。对不起大家。也许微软将来会改善这一点。