[原创][分享]通用日历拾取类(无须控件,公开源码)

hanzhang98 · 发表于 2009-3-5 19:11

实用精品！

谢谢谢谢！！

987654321 · 发表于 2009-3-5 20:29

只能佩服了....

hanzhang98 · 发表于 2009-3-9 09:41

楼主的东东非常好,学习了.但还有两问题如下.盼赐教!!(见附件)

1、如何由双击单元格显示日历窗体变为单击显示？

2、如何能让日历窗体显示在单元格的下方？

jury2003 · 发表于 2009-3-9 13:46

学习一下！！！

hanzhang98 · 发表于 2009-3-10 08:20

下载了楼主的日历拾取类,好用!!!!但有一问题请楼主和高手们赐教：在合并单元格内使用日历拾取类的VBA代码怎么写？
那么,想在"D2至G2"的合并单元格内使用日历拾取类的代码怎么写?请赐教!!谢谢!!

试了下面的语句都不行：
1、'If Target.Address = "$D$2" Then 这句仅在D2单元格行，一合并D2、E2、F2、G2 就不行了，激活不了日历窗体................?
2、'If Target.Address = Range("D2:G2").Select Then 这句代码也不行，也是激活不了日历窗体.....................?
3、...............................??????????????????

[ 本帖最后由 hanzhang98 于 2009-3-10 08:53 编辑 ]

hanzhang98 · 发表于 2009-3-10 08:55

原帖由 hanzhang98 于 2009-3-10 08:20 发表
下载了楼主的日历拾取类,好用!!!!但有一问题请楼主和高手们赐教：在合并单元格内使用日历拾取类的VBA代码怎么写？
那么,想在"D2至G2"的合并单元格内使用日历拾取类的代码怎么写?请赐教!!谢谢!!

试了下面的语句都 ...

已由[寒江独钓]赐教!!!并解决问题.

泓() · 发表于 2009-6-25 19:11

收下，实在是高啊。

嘻哩嘛哈 · 发表于 2009-8-6 17:27

老师05年的贴至今不沉,说明大家对日历是很需要的,但用了后碰到点问题,,那就是最早只能到1981年,但在实际应用中(如出生年月),肯定有1981之前的,想请老师完善一下不知如何?

不好意思,是我自己加的代码上限定的

[ 本帖最后由嘻哩嘛哈于 2009-8-7 11:17 编辑 ]

HUA79100101 · 发表于 2009-11-28 01:04

非常棒啊。。谢谢

neyohero · 发表于 2009-12-31 23:13

我用的是excel 2007，点下箭头选择日期的时候日期框距离下箭头按钮特别远，怎么调整啊？

		自动登录	找回密码
密码			免费注册