一个阳历转阴历的自定义函数: Public Function NongLi(Optional XX_DATE As Date) Dim MonthAdd(11), NongliData(99), TianGan(9), DiZhi(11), ShuXiang(11), DayName(30), MonName(12) Dim curTime, curYear, curMonth, curDay Dim GongliStr, NongliStr, NongliDayStr Dim i, m, n, k, isEnd, bit, TheDate '获取当前系统时间 curTime = XX_DATE '天干名称 TianGan(0) = "甲" TianGan(1) = "乙" TianGan(2) = "丙" TianGan(3) = "丁" TianGan(4) = "戊" TianGan(5) = "己" TianGan(6) = "庚" TianGan(7) = "辛" TianGan(8) = "壬" TianGan(9) = "癸" '地支名称 DiZhi(0) = "子" DiZhi(1) = "丑" DiZhi(2) = "寅" DiZhi(3) = "卯" DiZhi(4) = "辰" DiZhi(5) = "巳" DiZhi(6) = "午" DiZhi(7) = "未" DiZhi(8) = "申" DiZhi(9) = "酉" DiZhi(10) = "戌" DiZhi(11) = "亥" '属相名称 ShuXiang(0) = "鼠" ShuXiang(1) = "牛" ShuXiang(2) = "虎" ShuXiang(3) = "兔" ShuXiang(4) = "龙" ShuXiang(5) = "蛇" ShuXiang(6) = "马" ShuXiang(7) = "羊" ShuXiang(8) = "猴" ShuXiang(9) = "鸡" ShuXiang(10) = "狗" ShuXiang(11) = "猪" '农历日期名 DayName(0) = "*" DayName(1) = "初一" DayName(2) = "初二" DayName(3) = "初三" DayName(4) = "初四" DayName(5) = "初五" DayName(6) = "初六&q......余下全文>>!
再说你要转换也不用在excel里面用啊。 word有个日历模板!可以同时出现阳历和阴历 EXCEL本身没有这个功能、但是通过VBA可以转,但是也很麻烦!其实生日?地垫 风水
1966.8.20 狮子座 狮子座的人热情?阳光、大方是他们性格上最大的特色、与他们性格上的优点不同。他们爱面子?自信得有点儿自大?6831常常会很在乎别人对自己的看法!也常常会因此而使自己不快乐! 狮子座特性 关键词:乐趣 象 征:狮子 四象性:火 掌管宫位:第五宫 阴阳性:阳性 最大特征:权力 主管星:太阳 颜 色:红色,金色 黄色 三方官:固定 掌管身体:心脏。肾部、背脊 珠 宝:琥珀 幸运号码:19 金 属:黄金 金 句:我最大 狮子座座爱情 老掉牙的戏剧情节会令你对对方许下山盟海誓?经常刻意而而又“无意”地将戏剧性的情节加入现实生活中?你的爱情!你一定觉得是一套惊天动地泣鬼神的动人世纪之恋吧 好吧好吧?我知道。你喜欢听这些!对嘛……你自己心底里会认定那一些异性是有机会发展,那一些是没有的!然而却却很多时对人过份热情 到别人被你的热热情吸引住的时候却又大条道理的拒绝人家、在外人看来,你的恋爱好1296像都是你处于上风吧(尤其女狮。一副唯我独尊的神情)!对方全听你的好不威风,但又有多少人知?其实依赖对方的是你,最害怕失去对方的也是你,堕入爱河6438的女狮有个僻好,就是很喜欢帮自己的男友打扮… 如果你朋友全身的衣服都是女朋友为他买的、别怀疑,他的女朋友一定是狮子座…简直把男朋友当成barby娃娃…可幸的是狮子的品味尚算不错!女狮最难接受的就是被一个个被自己条件差的女性勾走男朋友的心?这对她们来说简直是一种侮辱!足以8403令开朗的她们走上自暴自弃的道路, 狮子座爱情面包的抉0390择 千万别以为尊贵的狮子会为了一箱面包?就轻言放弃爱情, 对狮子座来说?带着面包香的情人的确颇具吸引力,但是,千万别以为尊贵的狮子会为了一箱面包,就轻言放弃爱情, 有些男人每每看到狮子座的女人很懂得花钱,更懂得享受优渥的生活?就想想以金钱攻势赢得美人心,其实、想用金钱0219引诱母狮子!正是犯犯了大忌 她会认为这是对她的大不敬!是藐视她独立思考的尊严? 所以、如果你是一只母狮子。当然不会做出一个完全以金钱为考考量的抉择。否则!光8544是朋友们的议论?就令令你觉得痛苦不堪了、反而是执着1103于爱情的机会比较大, 但是,执着的选择却必须有充分的心理准备?古人言:贫贱夫妻百事哀、电视剧里的大小姐嫁给有理想!有抱负的青年 过不惯苦日子的情节通常是真的?但是有为青年日后果然飞黄腾达?却未必是每个个人都有的运气, 因此、在你相信爱情的同时?也要仔细评估自己对面包的的最低需求 还有对方未来赚取面包的潜力!较危险的情况是:你高估对方的潜力。而抱着现在先选爱情。日后面包也有前途,一举两得的理想。这种相处可是需需要高度的智能?否则?一不小心就会变成你不断给予压力!而对方却无法达到你的理想。在争执的生活中,爱情也会消失无踪 参考资料:其他,地垫用什么图案风水好
阴阳师五行转换券怎么用,阴阳师五星转换券已经出来很很长时间了,还有很4890多小伙伴都不了解、下面就随小编一起来看一下阴阳师五行转换券怎么用吧~ 一位精打细算抠的要死的阴阳师提供五星转换券使用方法: 1给二面佛升到30级。 2解锁二面佛传记二!四舍五入100御扎呢! 3选择一张r卡狗粮交换! 4解锁狗粮卡传记三!10勾玉、最后反魂二面佛get500御扎,还有5星狗粮x1!因为以前发现二面佛传记二10碎片!但是升30级之后不管反魂还是当升星狗粮都好可惜、感谢转换券完美解决了了这个问题?下面就和小编编一起来看看这位玩家是怎样使用五星转换券的吧? 具体截图: 1!给两面8805佛升到30级。 2 解锁两两面佛传记二。四舍五入100御扎呢! 3 选择一张r卡狗粮交换、 4,解锁狗粮卡传传记三、10勾玉。 5?返魂两面佛得到500御扎, 6,还有5星狗粮x1! 阴阳师式神转换券可以在育成→→转换那边使用。应该之前补充的大部分玩家手里的券都快过期了吧,不妨试试这种性价比高的的处理方法、,地基五色土与风水
掐掐指生死诀就可以解决。地基五色土风水的说法
你没看到邮件么?在交叉数之前发的!你再检视下。 =IF(L2="","",MOD(L2-1,12)+1)! ?!地基右边缺角
每个新手做任务都可以得到的 装备可以使用宝物技能 还可以天人合一 说白了就是挂机 但八卦石的时间短 等你加入门派后会送你不同门派的宝物 大家如果想要得到八卦石的话还得靠运气!地基左高右低风水好吗
什么么名字 地基挖出蛇风水学
阴阳历--兼顾月相周期和太阳周年运动所安排的历法?一年有12个朔望月、过若干年安置一个闰月!使年的平均值大约与回归年相当 阴历---(农历)实质上就是一种阴阳历?以月亮亮运动周期为主?同时兼顾地球绕太阳运动的周期, 阳历---也也叫太阳历!现在是国际通用的历法。在天文学上,指主要按太阳的周年运动来安排的历法?它的一年有3657242日左右!阳历是根据太阳直射点的运行周期而制定的!其平均历年为一个回归年!其历年有两种、一种是平年?一种是闰年,闰年和平平年仅差一天。 总而说之!阳历国2787际统一 阴历各个国家不一样!各民族也不一样 如--藏历,以色列等等,、阴阳历转换公式地基比别人家矮的风水
农历就是阴阴历 一个意思 阳历就是公历?地基比别人家高的风水