vba里面没有日历控件怎么办？

打开一个EXCEL工作簿，进入一个工作表中，按“视图－工具栏－控件工具箱”，会调出控件工具箱。

用鼠标点击工具箱中的“其他控件”按钮，会出现下面窗口，用滚动条向下拉动它，从中找到“日历控件11.0”，用鼠标选择它。(控件后面的版本号可能不同）

用鼠标选中它后，鼠标指针会变成一个十字形光标，然后在EXCEL窗口中按住鼠标左键拖出一个大小适中的“日历控件”。

如果你的电脑中找不到此控件，可从其他电脑上的 c:\windwos\system32\mscal.ocx 位置拷贝mscal.ocx到你电脑上的相同位置粘贴。也可以从网上下载这个mscal.ocx文件。

如果电脑中存在mscal.ocx文件，而不能正常使用日历控件，就需要在系统的【开始】－【运行】中输入 regsvr32 mscal.OCX 进行注册。

在工具箱点鼠标右键——附加控件，在附加控件窗口中选择如图的控件，如没有，请上网下载安装。确认后选择控件在窗体中添加。

控件代码如下

Private Sub DTPicker1_Change()

[O2] = Me.DTPicker1.Value

End Sub

Private Sub DTPicker2_Change()

[O3] = Me.DTPicker2.Value

End Sub

两种可能，

第一：可能你添加了两个datatimepicker；

第二：你在formload代码里面设置该控件的距离左边的距离和距离顶部的距离即可确定该控件的位置。

---