怎样实现在excel2007中控件插入日期.docxVIP

新建一个excel，然后要确保宏是打开的，我的是2007，点开发工具-宏安全性，在弹出界面选择启用所有宏，点击确定。新建，或者找到你需要编辑的表单，选择你要放置日期的那一列，设置这列的数据格式为日期，然后具体怎么显示，你可以自己选一种，而且做好了以后自己也可以再修改，只不过先选好了舒服一些。开始真正的工作了，找到开发工具-插入-选择最后如红圈内的图标，就是其他控件，日期控件是系统默认自带的一个控件。上一步点击之后，会弹出一个对话框，列出系统内所有可用的控件，把滚动条一直拖到最后，我的2007默认就有时间控件，如下图，双击选择这个控件（或者单击选择后点确定）。上一步之后，你随便在表单页面的任何位置点一下，就会在表单界面弹出日期控件了，如下图，这个控件是可以随便拖着跑的，而且编辑完成后它不会出现在表单界面的，只有你要输入日期的时候才会出现。现在，控件已经激活了，你需要告诉excel你要在那些地方用这个控件，就要vba编程了。具体就是，在你刚刚调出的日期控件界面上任意位置双击，注意，不是在表单上双击，是在日期控件的上面任意位置双击，就调出vba编辑环境了。在弹出的界面上会有一段代码，把这段代码删除，然后，把下面这段代码拷贝进去：Private Sub Calendar1_Click()ActiveCell = Calendar1.ValueMe.Calendar1.Visible = F