如何在<em>vba</em>建立窗口来实现录入数据

发你的表格过来看下吧...

有两种抄方法可以建立窗口来实现录入数据。
　　一种是选择你要录入数据的区域，再通过菜单“袭工具”->“记录单”，EXCEL就会弹出一个数据录入窗体。
　　第二种方法是按“ALT+F11”进入VBA编辑器，在这里，你可以插入一个用户窗体，百这个可能对没有接触过编程的人来说有些复杂，但功能确实比前一种方法要强劲得多了。
　　答题不易，度互相理解，您的采纳是我前进的动力。
我的做法是,新建制一个模块,在这个模块知里声明一个公有变量如:
Public a As Integer
然后,在sheet1的道Worksheet_Activate()事件里写上代码:
Private Sub Worksheet_Activate()
a = InputBox("mmmm")
Worksheets("sheet2").Select
End Sub
然后在sheet2的Worksheet_Activate()事件里写上代码:
Private Sub Worksheet_Activate()
If InputBox("nnnnnn") = a Then Range("a1").Value = a
End Sub
你参考一下吧

窗体上插入个textbox控件，就可以输入数据
弹出窗体，可以用代码实现，假设窗体名为userform1
则
Userform1.show