生日提醒小工具-自定义提醒类型-改进版（出生年月可放在任意一列）

恭喜您发财 · 发表于 2012-4-2 21:53

本帖最后由恭喜您发财于 2012-4-5 22:57 编辑

刚学了listbox,combobox，listview, 做个实例巩固下。新手分享，欢迎大侠指正。

20120404:做了一些改进：
1. 出生年月可以放在最后一列
2. 列数不限，可以任意增减。

20120405：在一指禅大侠的提示下，更正了计算上的错误。{:soso_e134:}

jygzcj · 发表于 2012-4-2 22:03

这个比较综合。谢谢楼主的分享！！

安全为主 · 发表于 2012-4-2 22:18

下来研究下，谢谢楼主。

YZC101 · 发表于 2012-4-3 00:28

哈哈！不错！
学习修改

自定义生日提醒类型.rar (13.88 KB, 下载次数: 141)

恭喜您发财 · 发表于 2012-4-3 06:32

YZC101 发表于 2012-4-3 00:28
哈哈！不错！
学习修改

感谢朋友完善

少如 · 发表于 2012-4-3 07:07

请教老师 , 如果出生年月在第六 (F) 列, 该如何修改代码?
谢谢!!!

少如 · 发表于 2012-4-3 14:23

本帖最后由少如于 2012-4-3 14:24 编辑

是的, 六楼的请教问题太菜了, 可我确实不懂VBA, 请各位老师见谅 ! 还是教教学生吧, 我想信对您来说, 只是举手之劳, 而对我来说, 却学会一个知识!!!
好, 谢谢了!!!

恭喜您发财 · 发表于 2012-4-3 18:14

少如发表于 2012-4-3 14:23
是的, 六楼的请教问题太菜了, 可我确实不懂VBA, 请各位老师见谅 ! 还是教教学生吧, 我想信对您来说, 只是 ...

列数是由这个决定的，如果这个也看不懂，我也没办法了：
      .ColumnHeaders.Add , , "序号", .Width / 8       '第1列
      .ColumnHeaders.Add , , "姓名", .Width / 5       '第2列
      .ColumnHeaders.Add , , "性别", .Width / 8       '第3列
      .ColumnHeaders.Add , , "出生年月", .Width / 4       '第4列
      .ColumnHeaders.Add , , "序列/总数", .Width / 3       '第5列

少如 · 发表于 2012-4-3 20:45

恭喜您发财发表于 2012-4-3 18:14
列数是由这个决定的，如果这个也看不懂，我也没办法了：
.ColumnHeaders.Add , , "序号", .Wid ...

请老师给看看,
谢谢了!!!

自定义生日提醒类型.zip (19.01 KB, 下载次数: 52)

恭喜您发财 · 发表于 2012-4-3 21:07

少如发表于 2012-4-3 20:45
请老师给看看,
谢谢了!!!

好心给你看，你的文件里放那个代码干什么？

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

[分享] 生日提醒小工具-自定义提醒类型-改进版（出生年月可放在任意一列）