用窗体模仿日历控件

cuiyf2004

爱疯 发表于 2016-10-12 11:03
72楼意思是说，窗体位置 随着激活单元格 而改变。
因为设置位置的代码要写在被指定工作表的Worksheet_Se ...

我自己实现了一下TOP方向的定位有问题，left的定位倒是可以

1. Dim a As String
   
2. Dim b As String
   
3. a = ExecuteExcel4Macro("GET.CELL(44)")
   
4. b = ExecuteExcel4Macro("GET.CELL(43)")
   
5. Me.Left = a
   
6. Me.Top = b

复制代码

mqjbayni

在窗体中，比如textbox2为要输入日期的文本框，那该如何调用该控件呢？

爱疯

用窗体模仿日历控件_74.rar (20.86 KB, 下载次数: 851)

2016-12-12 15:47 上传

点击文件名下载附件

苏子龙

好工具，若能再加农历什么的就更完美了

爱疯

苏子龙 发表于 2016-12-13 13:46
好工具，若能再加农历什么的就更完美了

我不会公历和农历的关系，希望有1天会 。。。{:281:}

苏子龙

爱疯 发表于 2016-12-13 14:13
我不会公历和农历的关系，希望有1天会 。。。

已经非常实用了，谢谢楼主的分享。

paley0328

太棒了，解决了我要插入日历控件失败的问题。
现在是窗体自动跳到输入单元格下方，能否不动，或者调到右边呢？因为我是连续一列往下录。这个窗体是怎么做的啊？太牛了！

爱疯

paley0328 发表于 2017-1-11 12:09
太棒了，解决了我要插入日历控件失败的问题。
现在是窗体自动跳到输入单元格下方，能否不动，或者调到右边 ...

谢谢 paley0328！我试了一会儿，暂时没想到好办法，只好先放着了。

笨方法是：
比如，要在P列连续录入，那就把P列先拖到窗体左侧。

charles7580

东西是好东西，就是不知道怎么设置之后可以在特定单元格点击之后显示……每次打开calendar有点小麻烦……另外不知道这么好的东西是否可以嵌入excel文件呢？

爱疯

charles7580 发表于 2017-3-31 14:43
东西是好东西，就是不知道怎么设置之后可以在特定单元格点击之后显示……每次打开calendar有点小麻烦……另 ...

1）不清楚你的意思。
2）如果是Excel 2010，开发工具-加载项-浏览，选择这文件，确定。那么每次启动excel，就能用了。