☰

当用户点击按钮时，表格数据输入表单会弹出

tag-icon • tag-icon microsoft-excel
当用户点击按钮时，表格数据输入表单会弹出

我有一个包含表格的工作表。我已将“表单”命令添加到 QAT，当我选择表格中的单元格，然后按 QAT 中的“表单”图标时，数据输入表单会弹出 - 正如预期的那样。

我不能指望我的最终用户知道 QAT 上的图标！

我想在工作表上放置一个按钮（开发人员->插入 - 诸如此类，并不真正关心它是表单控件还是 ActiveX 控件）。

当用户单击按钮时，数据输入表单将会弹出。

通过按钮的 VBA _Click() 方法，我可以选择表格；

ActiveSheet.ListObjects(“Table1”).Range.Select

但我不知道如何让数据输入表单弹出。

任何帮助都将不胜感激（我尝试过网页搜索但无济于事 - 不敢相信我是唯一一个遇到这个要求的人）。

答案1

经过更多的网络搜索，我找到了 ActiveSheet.ShowDataForm 不起作用的原因，我已经尝试过了。表格必须从单元格 A1 开始，或者名称为“数据库”。

以下代码按要求工作；

Private Sub CommandButton1_Click()

ActiveSheet.ListObjects("Table1").Range.Name = "database"

ActiveSheet.ShowDataForm

End Sub

相关内容