无法找到日期控件

YYH201211

各位老师，我的系统是win7 64位，office是2013版64位，安装后无法找到日期控件，按照网上搜索的解决方法，下载了mscomct2.ocx，拷贝到c:\windows\syswow64 文件夹目录下，然后以管理理员身份运行” 命令提示符“，输入入以下语句”regsvr32c:\windows\syswow64\mscomct2.ocx,回车后，提示调用失败，错误代码0x8002801C,
按照61课时的内容用VBA进去也报错,
Sub 自动注册日期控件()
   Dim k
   FileCopy ThisWorkbook.path & "/MSCOMCT2.OCX", "C:\Windows\system32\MSCOMCT3.OCX"
   k = Shell("regsvr32 MSCOMCT2.OCX")
End Sub

请教线上大师如何处理，谢谢！