VBA Excel数据表不显示正确的输入和字段

Question

我有以下VBA代码，它应该显示来自另一个隐藏工作表的数据表单。

Sub CoverageBssEntry()

   Application.ScreenUpdating = False
   Sheets("myhiddensheet").Select
   Range("myTable[#All]").Select
   ActiveSheet.ShowDataForm

End Sub

当我运行它时，数据表单不包含该表的标签和输入框。

任何帮助都非常感谢，因为它让我疯了！我唯一的另一个选择是花时间构建自定义用户表单，而这样做会很完美。

Answer 1

您无法选择隐藏的工作表。无论如何.Select语句不是必需的

尝试

Sheets("myhiddensheet").ShowDataForm

Answer 2

修复方法是使用：

ActiveSheet.Cells(x,y).Select 

之前调用.ShowDataForm，就像一个jiffy！

Answer 3

我认为ShowDataForm命令存在真正的限制。如果在特定范围内在VBA外部调用它，它可以正常工作。但是一旦编码到VBA中，它将只返回引用工作表中第一个表的表单，即使记录了一个宏来执行该操作。 我不知道为什么。也许是因为showdataform事件与工作表有关，而不是在调用它时选择的表或列表。对不起大家。也许微软将来会改进这一点。