ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 10703|回复: 35

[分享] 号称具27662年计算功能的万年历(亲友农历生日显示等功能)

[复制链接]

TA的精华主题

TA的得分主题

发表于 2015-4-8 08:53 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖已被收录到知识树中,索引项:其他编程应用
本帖最后由 YZC51 于 2015-4-10 17:57 编辑

号称具有27662年计算功能的万年历(有亲友生日显示等功能)

首先感谢蓝桥玄霜版主的热心帮助!
本万年历借用了许剑伟老师创作的寿星天文历的网页版,在此致谢!
并对许剑伟老师在创作寿星天文历上付出的辛勤劳动和无私奉献精神,致以由衷的钦佩!
限于本人水平,如有不当、不妥、错误之处,还请各位老师、版主及论坛大侠们批评指正!
功能介绍:
此万年历在公元前四九九七年到公元二二六六五年 期间内有效,共27662年。本万年历具有亲友农历生日、农历及公历节日、节气的显示功能!
使用方法:解压缩后即可使用(源码完全公开)
一、年月调整:在月历表
1.在A1单元格输入年份;
2.在A3单元格输入月份;
二、纪念日调整:纪念日表格
1.公历节日调整:
a.在C列的下部第一个空白单元格输入月日代码。例如:1月1日则输入(0101)4位代码,
b.特殊节日调整:11月的第4个星期4,则输入(01144)5位代码;
c.在D列同一行复制上一单元格公式,在E列同一行输入节日名称即可;
2.农历节日调整:纪念日表格
在G列的下部第一个空白单元格输入农历月日代码。例如:正月初一,则输入(0101)4位代码,在H列同一行复制上一单元格公式,在I列同一行输入节日名称即可;
3.亲友生日调整:纪念日表格
在L列的下部第一个空白单元格输入生日的农历月日代码。例如:正月初一,则输入(0101)4位代码,在M列同一行复制上一单元格公式,在N列同一行输入亲友名称即可。
学习万年历-yzc.rar (66.48 KB, 下载次数: 557)
起始日期已从现代的1900年开始,修改后的文件在4楼。



补充内容 (2015-4-14 19:21):
发现BUG,更新文件在11楼!

评分

3

查看全部评分

TA的精华主题

TA的得分主题

发表于 2015-4-8 12:05 | 显示全部楼层
历法是非常复杂的。
农历是逐步完善的,期间经过多次更新,所以建议起始日期从现代的1900年开始比较好。

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-4-8 12:52 | 显示全部楼层
蓝桥玄霜 发表于 2015-4-8 12:05
历法是非常复杂的。
农历是逐步完善的,期间经过多次更新,所以建议起始日期从现代的1900年开始比较好。

谢谢版主加分和提出的宝贵建议,待改进后再传上来!
更感谢版主对我的热心帮助和指导!

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-4-9 11:51 | 显示全部楼层
蓝桥玄霜 发表于 2015-4-8 12:05
历法是非常复杂的。
农历是逐步完善的,期间经过多次更新,所以建议起始日期从现代的1900年开始比较好。

根据您的指教和建议,起始日期已从现代的1900年开始!还请您斧正!
谢谢!
万年历1.1-yzc.rar (114.09 KB, 下载次数: 520)

评分

2

查看全部评分

TA的精华主题

TA的得分主题

发表于 2015-4-11 12:50 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-4-12 17:41 | 显示全部楼层
学不完用不尽 发表于 2015-4-11 12:50
速度有点慢。

谢谢提醒,源码是公开的,还请您和各位高手维护更新后传上来,我虽水平有限,但也会尽力更新的!
再次谢谢!

TA的精华主题

TA的得分主题

发表于 2015-4-12 21:58 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
下载学习 刚刚接触 我是小白菜。。。

TA的精华主题

TA的得分主题

发表于 2015-4-12 22:09 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
error.png
LZ 出错了  打开没问题  年份改一下就这样了~
咋回事了?

TA的精华主题

TA的得分主题

发表于 2015-4-12 23:06 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
谢谢楼主分享!学习万年历使用

TA的精华主题

TA的得分主题

 楼主| 发表于 2015-4-12 23:14 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
qhlf78 发表于 2015-4-12 22:09
LZ 出错了  打开没问题  年份改一下就这样了~
咋回事了?

谢谢!点击上一年或下一年按钮就好啦!不能直接输入年份的!
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-12-12 05:18 , Processed in 0.055807 second(s), 11 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表