ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[原创] 八字起大运

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2019-6-24 12:12 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
mark! 学习

TA的精华主题

TA的得分主题

发表于 2019-6-24 16:15 | 显示全部楼层
请问“八字分析”中的“交运日期”是不是可以等于“节气时刻”加上“起大运周岁”?
如果可以的话,我用函数=DATE(1989+5,11+8,11+0)来计算默认的交运日期,和实际VBA计算出来的交运日期总是有10~30天左右的差距,这是为什么呢?
是因为闰年和闰月的原因还是DATE函数计算的不准确呢?
1.jpg

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-6-24 16:51 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
lingdo2001 发表于 2019-6-24 16:15
请问“八字分析”中的“交运日期”是不是可以等于“节气时刻”加上“起大运周岁”?
如果可以的话,我用函 ...

“交运日期” = “出生时刻” + “起大运周岁”

TA的精华主题

TA的得分主题

发表于 2019-6-24 22:36 | 显示全部楼层
本帖最后由 lingdo2001 于 2019-6-24 23:18 编辑
zopey 发表于 2019-6-24 16:51
“交运日期” = “出生时刻” + “起大运周岁”

原来如此,非常感谢。但我用“出生时刻” + “起大运周岁”代入DATE函数:=DATE(1989+5,11+8,11+0)
计算出来的结果和VBA的结果有时还是有1~2天的差距(如图),这是什么原因呢?

1.jpg

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-6-25 08:18 | 显示全部楼层
在1楼 就有说明,我用的是 “干支历”  岁月天 加法,而不是公历 年月日 加法。

TA的精华主题

TA的得分主题

发表于 2019-6-25 09:50 | 显示全部楼层
zopey 发表于 2019-6-25 08:18
在1楼 就有说明,我用的是 “干支历”  岁月天 加法,而不是公历 年月日 加法。

sk3 = d2 - 360 * Int(d2 / 360) - 30 * Int((d2 - 360 * Int(d2 / 360)) / 30) - DateDiff("d", A, Cells(20, 4).Value)
这里的sk3的计算过程是啥意思呢?没看懂。

TA的精华主题

TA的得分主题

发表于 2019-7-17 23:47 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
做得非常好!以前我用java编过,没想到VBA也能完成。如果你有时间,建议把这几个功能合并起来。一般的八字算命包括:排八字、流年运程(这两项你已经完成),还有五行的旺相休囚死、十二宫、星宿神煞、用神等,参考书目:中国古代算命术 洪丕谟,姜玉珍编著。

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-7-18 16:06 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
xmlingling 发表于 2019-7-17 23:47
做得非常好!以前我用java编过,没想到VBA也能完成。如果你有时间,建议把这几个功能合并起来。一般的八字 ...

谢谢你的鼓励,以后加强学习.

TA的精华主题

TA的得分主题

发表于 2019-10-9 08:39 | 显示全部楼层
image.png
这个是以00点未准的,比如2019年8月27日23点出生己亥 壬申 丙申 庚子,如果是2019年8月28日00点出生己亥 壬申 丁酉 庚子

TA的精华主题

TA的得分主题

发表于 2019-10-9 09:57 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
性别:        男        公历生日:        2019/8/13 12:00 AM                                                                          阴阳(年)        阴年        四柱        己亥猪年 壬申立秋月令 壬午日                         顺逆        逆        节气        节气时刻        起大运周岁        大运        交运日期                 立秋        2019/8/8 3:13        1岁 7个月 13天        辛未        2021/3/23                 小暑        2019/7/7 17:20        12岁 1个月 3天        庚午        2031/9/16                 芒种        2019/6/6 7:06        22岁 6个月 24天        己巳        2042/3/5                 立夏        2019/5/6 3:02        32岁 11个月 14天        戊辰        2052/7/25                 清明        2019/4/5 9:51        43岁 2个月 10天        丁卯        2062/10/23                 惊蛰        2019/3/6 5:09        53岁 3个月 4天        丙寅        2072/11/15                 立春        2019/2/4 11:14        63岁 2个月 3天        乙丑        2082/10/16                 小寒        2019/1/5 23:38        73岁 0个月 1天        甲子        2092/8/12                 大雪        2018/12/7 12:25        82岁 9个月 27天        癸亥        2102/6/7                 立冬        2018/11/7 19:31        92岁 8个月 22天        壬戌        2112/5/1                 寒露        2018/10/8 16:14        102岁 9个月 8天        辛酉        2122/5/19                 白露        2018/9/8 0:29        112岁 11个月 27天        庚申        2132/8/8
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-18 17:41 , Processed in 0.040408 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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