1、教程以新建的Excel文档为例。
2、打开Excel文档之后，插入一个控件，本教程以ActiveX控件为例。调用控件的技巧可以参考一下链接：
3、鼠标右键单击绘制好的控件，选择弹出菜单中的查看代码命令。
4、此时会自动跳转到VBA界面窗口，如图所示。
5、在代码窗口中复制粘贴以下代码（加粗字体为标题内容，可以自己编辑修改）：Private Sub Command蚱澄堆别Button1_Click() Dim k k = InputBox("", "请输入内容") MsgBox kEnd Sub
6、点击关闭按钮，关闭VBA窗口，回到Excel界面。
7、点击控件按钮，即会弹出一个输入窗口，此时输入窗口标题内容与步骤五中填写的一致。
